Ningún  esfuerzo  tecnológico  en  la  historia  de  la 
humanidad  ha  avanzado  tan  rápidamente  como  la 
industria  de  la  informática  en  los  últimos  40  años. 
Mantenerse  al  día  de  los  cambios  que  se  están 
produciendo  requiere  disponer  de  una 
información  puntual  y  fiable. 

Ahí  es  donde  intervenimos  nosotros.  Somos  CW 
Communications/lnc.  la  editorial  más  grande  del 
mundo  de  publicaciones  de  informática  De  hecho, 
más  de  12.000.000  de  personas  relacionadas 
con  la  informática  en  todo  el  mundo  dependen 
de  nosotros  para  recibir  la  información  que 
necesitan  para  mantenerse  en  la  primera  posición. 

Si  vd.  comercializa  productos  o  servicios 
relacionados  con  la  informática  a  nivel  nacional 
y/o  internacional,  nosotros  le  podemos  ayudar. 

Le  ayudaremos  a  llegar  a  los  profesionales  en  este 
campo,  a  los  responsables  de  la  tecnología  de  la 
informática  en  compañías  medianas  y  grandes. 
Disponemos  de  publicaciones  dedicadas  a  sus 
intereses  en  27  países:  República  Federal  de 
Alemania,  Arabia  Saudí,  Argentina,  Asia,  Australia, 
Austria,  Brasil,  Chile,  Corea  del  Sur,  Dinamarca,  España, 
Estados  Unidos,  Finlandia,  Francia,  Holanda,  Hungria, 
India,  Israel,  Italia,  Japón,  México,  Noruega, 

Reino  Unido,  República  de  China,  Suecia,  Suiza, 
Venezuela 

Le  ayudaremos  a  llegar  al  mercado  de  terceros 
que  incluye  casas  de  sistemas,  DEALERS  de  valor 


añadido,  distribuidores  y  otros  que  vender  s. 
producto.  Disponemos  de  publicaciones  que 
llegan  a  este  mercado  en  Francia,  los  Estados 
Unidos  y  Alemania. 

Le  ayudaremos  a  llegar  a  los  profesionales  er  e 
mundo  de  las  comunicaciones  de  datos,  voz  . 
vídeo  y  compañías  pequeñas  y  grandes,  cor 
nuestras  publicaciones  en  Asia,  Australia,  los 
Estados  Unidos  y  ESPAÑA. 

Y  le  ayudaremos  a  llegar  a  los  usuarios  de 
ordenadores  personales,  a  través  de  nuestras 
revistas  de  micros  y  de  marcas  específicas. 
Atendemos  sus  NECESIDADES  de  información  e~ 
19  países:  República  Federal  de  Alemania, 
Argentina,  Australia,  Brasil,  Chile,  Dinamarca, 
España,  Estados  Unidos,  Finlandia,  Grecia,  Hungría. 
Israel,  Italia,  Holanda,  Noruega,  la  República  de 
China,  Suecia,  Reino  Unido. 

Descubra  lo  fácil  que  es  llegar  a  su  público  en 
estos  mercados.  Cuando  vd.  quiera  comercializa: 
sus  productos  o  servicios  informáticos  a  nivel 
internacional,  utilice  nuestro  servicio  de  pubPc  : ; : 


CW  COMMUNICATIONS/INC 

(./Rafael  (  alvo,  18  4°  B  28010  MADRID 


‘  APUBUCATIONOF 
r  CW  COMMUf^CATíONS 


Director  General; 

Francisco  Zabala 


Comrnodoml|n|CÍ|  UMARIO 


seT-íor  :s,wr® 

Commodore  World 
está  publicado  por 
CW  COMMUNICATIONS,  S.A. 
y  la  colaboración 
de  todos  nuestros  lectores. 

Director: 

Juan  Manuel  Urraca 

Dpto.  publicidad: 

Gloria  Montalvo  (Madrid) 

Magda  Zabala  (Barcelona) 

Redacción/ Dpto.  Técnico: 

Diego  Romero, 

Alvaro  Ibáñez 

Colaborador: 

José  Luis  Errazquin 

Diseño; 

Miguel  Angel  Hermosel! 

Secretaria  de  dirección: 

Lola  Hermosell 

Distribución  y  Suscripciones: 

Femando  Rodríguez  (dirección), 

Angel  Rodríguez, 

Juan  Márquez  (suscripciones) 

Tels.:  419  40  14 

COMMODORE  WORLD 
c/  Rafael  Calvo,  18-4e  B 
28010  Madrid 
Tels.  (91)419  40  14 
Télex:  45522 

(indicar  CW  COMMUNICATIONS) 

DELEGACION  EN  BARCELONA: 
c/  Bertrán,  18-20,  3o  -  4.a 
08023  Barcelona 
Tels.  (93)  212  73  45/212  88  48 

C.I.F.  A.-28-735389 

El  P.V.P.  para  C  euta,  Melilla  y  Canarias,  incluido 
servicio  aéreo  es  de  375  Pías.,  sin  J.V.A. 

Distribuidora:  SGEL 
Avda.  Valdelaparra.  s/n. 

Polg.  Ind.  dé  Alcobendas  -  Madrid 

Distribuidor  en  Sudamérica 
A/C  de  Guatemala 

17  Calle,  13-72,  Zona  II  -  Tel.  480402 
GUATEMALA.  CA. 

LIBRERIA  HACHETTE,  S.A. 

Rtvadavia,  739 

1002  Buenos  Aires  -  Tel.  34-8481  al  85 

OfRcentro  SRL 
diva  550,  P.O.  Box  1 135 
Asunción  (PARAGUAY) 

LEDIAN,  S.A. 

Marcelino  Sosa,  2359  -  Tel.  20  61  24 
Montevideo  (URUGUAY) 

DISTRIBUIDOR  EXCLUSIVO  PARA  MEXICO 
CENTROS  DE  COMPUTO  PASCAL 
Federico  T.  de  la  Chica,  2-4 
Circuito  Centro  Comercial  C.P.  53100 
Ciudad  Satélite,  NAUCALPAN, 

Tel.  393  76  59  -  Edo.  de  MEXICO 


PROHIBIDA  LA  REPRODUCCION 
TOTAL  O  PARCIAL  DE  LOS 
ORIGINALES  DE  ESTA  REVISTA 
SIN  AUTORIZACION  HECHA  POR 
ESCRITO. 

NO  NOS  HACEMOS 
RESPONSABLES  DE  LAS 
OPINIONES  EMITIDAS  POR 
NUESTROS  COLABORADORES 


__  imprime: 

|J¡^  IBERDOS  S.A 

Germán  Pérez  Carrasco,  24. 
28027  Madrid 

Depósito  Legal:  M-2944-1984 


EDITORIAL 


.CONEXION  ENTRE 
1  ORDENADORES 


18 

31 


SOLO  VOLAR 
ES  MAS  BONITO 


SECCION  DE  JUEGOS 

•  Aliens 

•  Flash  Gordon 

•  Scooby  Doo 

•  Druid 

•  Escape  From  Singe ’s  Castle 

•  S.W.A.T. 

•  Park  Patrol 

•  Solo  Flight 


40 

45 


48 

50 

55 

56 
58 

60 


1001  TRUCOS  DE  BASIC 


CODIGO  MAQUINA 
A  FONDO 


DIRECTORIO 


CARTAS  DEL  LECTOR 


MARKETCLUB 


MICROLOGO 


APROVECHANDO 
EL  TECLADO 


COMENTARIOS 
F  COMMODORE 

•  Rom  disk  y  tarjeta  para 
Eproms 

•  Programador  de  Eproms 
Goliath 

•  Nueva  unidad  de  discos 

•  Microrhythm 


#  Generador  de  calendarios _ 

#  Future  raiders:  el  deporte  del  espacio 

#  y  todos  vuestros  artículos... 


Commodore  World  es  miembro  de  CW  Communications/ Inc.,  el  grupo  editorial  más 

V  <^>  Wf - grande  y  de  mayor  prestigio  del  mundo  en  lo  que  se  refiere  al  ámbito  informático.  Dicho 

[  r\  n  I  (i  8ruP°  nene  a  cargo  la  edición  de  más  de  80  publicaciones  relacionadas  con  los  ordenadores 

|\\j  C/Aty  J\  en  ^  países.  Catorce  millones  de  personas  leen  una  o  más  publicaciones  del  grupo  todos 

I  ZS  IV  ^/\  los  meses.  Los  miembros  del  grupo  CWCI  contribuyen  al  Servicio  de  Noticias  de  Compu- 

■  - -  terworld.  Esta  red  proporciona  diariamente  las  últimas  noticias  del  mundo  de  la  informá¬ 

tica  a  nivel  nacional  e  internacional.  El  grupo  está  integrado  por:  ARABIA  SAUDI:  Arabian  Computer  News.  ARGEN¬ 
TINA:  Computerworld  Argentina,  PC  Mundo.  ASIA:  Asían  Computerworld.  AUSTRALIA:  Computerworld 
Australia.  Communications  World,  Australian  Macworld.  Australian  PC  World.  AUSTRIA:  Computerwelt  Oesterreich 
BRASIL:  Data  News,  PC  Mundo,  Micro  Mundo.  CHILE:  Informática,  Computación  Personal.  COREA  DEL  SUR- 
Electronic  Times  Computerworld.  PC  World.  DINAMARCA:  Computerworld  Danmark,  PC  World  ESPAÑA- 
Computerworld  España.  PC  World,  Commodore  World,  Comunicaciones  World.  ESTADOS  UNIDOS:  Computer¬ 
world.  InCider,  Info  World,  PC  World,  80-Micro,  Mac  World,  Micro  Market  World,  Run  (Commodore)  FOCUS 
Publications.  Amiga  World,  NetWork  World,  Boston  Computer  News,  Digital  News,  Publish!,  CD-Rom,  Computers  in 
Science,  Federal  Computer  Week,  Portable  Computer  Review.  PC  Resource.  FINLANDIA:  Tietoviikko,  Mikro 
FRANCIA:  Le  Monde  Informatique,  InfoPC,  Distributique.  Le  Monde  des  Telecoms,  PC  Hebdo.  GRECIA:  Micro 
Computer  Age.  HOLANDA:  Computerworld  Netherlands,  PC  World.  HUNGRIA:  Computerworld/ SZT,  Mikrovilag, 
Tudomany.  INDIA:  Dataquest.  ISRAEL:  People  &  Computers  Monthly,  People  &  Computers  Weeklv  ITALIA: 
Computerworld  Italia.  JAPON:  Computerworld  Japan.  MEXICO: '  Computerworld/ México,  Compumundo 
NORUEGA:  Computerworld  Norge,  PC  World  Norge.  NUEVA  ZELANDA:  Computerworld  New  Zealand.  REINO 
UNIDO:  PC  Business  World,  Computer  News,  Dec  Today,  ICL  Today,  Lotus  UK.  REPUBLICA  FEDERAL  ALE¬ 
MANA:  Computerwoche,  PC  Welt,  Run,  Information  Management'  PC  Woche.  REPUBLICA  POPULAR  DE 
CHINA:  China  Computerworld.  China  Computerworld  Monthly.  SUECIA:  ComputerSweden,  MikroDatorn.  PC 
World.  SUIZA:  Computerworld  Schweiz.  VENEZUELA:  Computerworld  Venezuela. 
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DITORIAL 


NOTICIAS 


Todo  lo  que  hemos  visto  en  INFORMA  T  87 
ha  sido  muy  interesante,  pero  en 
especial  las  novedades  respecto  al 
AMIGA.  La  evolución  del  mercado  ha 
hecho  trabajar  duro  a  los  diseñadores  de 
Commodore.  La  compatibilidad  con  los 
PC  es  ya  un  punto  clave  en  el  diseño  y 
fabricación  de  nuevos  ordenadores. 
Esperamos  que  este  reto  asumido  por  el 
nuevo  AMIGA  2000,  sirva  para  relanzar 
la  presencia  de  esta  máquina  tan  versátil 
en  nuestro  mercado. 

Durante  la  semana  que  ha  durado 
INFORMA  T  87  hemos  tenido  la 
oportunidad  de  conoceros  un  poco  más. 
Han  sido  muchos  los  amigos  que  se  han 
acercado  a  nuestro  stand  para  conocernos 
y  hacer  sus  sugerencias.  A  todos, 
gracias  por  vuestra  presencia  y  por  las 
muestras  de  apoyo  a  esta  revista. 

Confiamos  en  poder  seguir  dando  a  todos 
los  usuarios  el  nivel  de  información  que 
solicitáis. 

Por  otra  parte,  esta  feria  ha  demostrado  la 
profesionalización  incluso  de  los  pequeños 
ordenadores.  La  presencia  de  las  casas  de 
juego  fue  nula.  Esto  indica  el  nivel  de 
utilización  de  aplicaciones  y  programas  de 
gestión.  En  definitiva  es  una  muestra  de 
aumento  de  conocimientos  informáticos  de 
los  usuarios.  Esto  se  puede  aplicar  a  nivel 
general,  pero  en  especial  nos  referimos  a 
los  usuarios  de  Commodore.  Desde  aquí 
os  animamos  a  seguir  ampliando  vuestros 
conocimientos  y  os  brindamos  nuestra 
ayuda  en  todos  los  campos. 

Pronto  os  ayudaremos  a  crear  vuestros 

propios  cartuchos  de  juegos,  aplicaciones  o 
programas  de  utilidad  y  herramientas.  Es 
un  campo  poco  difundido  y  que  sin 
embargo  amplía  muchísimo  la  potencia  de 
nuestros  ordenadores.  Es  una  nueva  vía 
que  esperamos  aprovechar  al  máximo  con 
vuestra  ayuda  e  interés. 


PROGRAMAS 
PARA  C-16 

Los  usuarios  de  ordenadores 
Commodore  16  están  de 
enhorabuena.  La  casa  CIMEX  de 
Barcelona,  siguiendo  con  su  línea 
de  satisfacer  a  los  usuarios  de  toda 
la  gama  de  ordenadores 
Commodore,  ha  importado  varios 
programas  y  accesorios  que  hasta 
el  momento  no  estaban  en  nuestro 
mercado. 

Para  satisfacer  las  necesidades  de 
hardware,  CIMEX  va  a 
comercializar  una  ampliación  de 
memoria  de  64  K,  adaptador  de 
joystick  (para  poder  utilizar 
cualquier  tipo),  adaptador  de 
datacassette  (para  poder  usar  los 
del  C-64/128  o  VIC-20),  etc... 

En  cuanto  al  software,  de  los  doce 
títulos  importados  podemos 
destacar  los  siguientes: 
BRIDGHEAD,  LEGIONAIRE, 
THAI  BOXING,  PIN  POINT, 
etc...  ■ 


AMIGA 
PARA  TODOS 
LOS  BOLSILLOS 

La  nueva  gama  de  ordenadores 
AMIGA  ha  llegado.  Como 
anunciábamos  desde  estas  páginas 
hace  unos  meses,  Commodore  ha 
lanzado  nuevos  modelos  de  su 
último  ordenador.  Concretamente 
se  venderán  en  breve  plazo  tres 
modelos  distintos:  AMIGA  500, 
AMIGA  1000  y  AMIGA  2000. 

El  modelo  500  tiene  un  aspecto 
exterior  parecido  a  la  base  del 
“Apple  II  e”  o  del  “Atari  520”. 
Tiene  una  unidad  de  disco  de  3,5 
pulgadas  y  todas  las  capacidades 
de  gráficos  y  sonido  que  el  primer 
modelo.  El  modelo  1000  no  difiere 
mucho  del  anterior,  excepto  en  su 
mayor  capacidad  de  memoria 
RAM  (1  Mb). 

El  modelo  AMIGA  2000  tiene  el 
aspecto  exterior  de  un  PC  XT.  Es 
el  más  completo  y  caro  de  los  tres, 
pero  esperamos  que  merezca  la 
pena.  Su  compatibilidad  con  los 
XT  será  su  punto  más  fuerte, 
esperamos  poder  daros  más 
información  en  breve.  ■ 
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COMMODORE  WORLD  EN  DISCOS 


NOMBRE 

DIRECCION 

POBLACION 


)  PROVINCIA 


DESEO  RECIBIR  EL  DISCO  CON  LOS  PROGRAMAS  DE  LA  REVISTA  Nc 

PRECIO  DEL  DISCO  2.000  PTAS.  -  SUSCR1PTORES  DE  LA  REVISTA,  1.750  PTAS. 
SOY  SUSCRIPTOR  □  N°  DE  SUSCRIPTOR . 


DESEO  SUSCRIPCION  ANUAL  (1 1  DISCOS)  A  PARTIR  DEL 

□  Incluyo  cheque  por  valor  de  . . p 

CU  Envió  giro  n8  .  por . .  p 

(*)  La  suscripción  no  puede  iniciarse  con  números  anteriores  al  14. 


(Suscripción  17.500  Ptas)* 
Firma, 


SI  DESEAS  RECIBIR  LA 
REVISTA  EN  DISCOS  PA¬ 
RALELAMENTE  A  LA  EDI¬ 
CION  IMPRESA,  ENVIANOS 
ESTE  CUPON.  EL  DISCO 
SOLO  LLEVA  GRABADOS 
LOS  PROGRAMAS  DE  LA 
REVISTA,  PERO  NO  LOS 
ARTICULOS.  CADA  DISCO, 
A  PARTIR  DEL  N®  14  IN¬ 
CLUSIVE,  VA  EN  SU  ESTU¬ 
CHE  CON  SU  PORTADA 
CORRESPONDIENTE  A  TO¬ 
DO  COLOR. 


EJEMPLARES  ATRASADOS  DE  COMMODORE  WORLD 


7 

8 

10 

11 

12 

13 

14 

15 

16 

17 

19 

20 

21_ 

22 

23 

2£ 

25 

26^ 

27 

□ 

oc 

29 

30 

31 

32 

33 

34 

•  Desde  el  n9  7  al  17  a  315  ptas. 

•  Desde  el  ne  18  al  32  a  350  ptas. 

•  A  partir  del  33  a  375  ptas. 

Los  números  que  no  figuran  se  encuentran 
agotados. 

Forma  de  pago:  sólo  por  cheque  o  giro. 


Peticionario 

Calle . 

Población 


. . - .  N® . Teléf. 

. - . . . .  C.P . Provincia . 

□  Incluyo  cheque  por  valor  de  .  pesetas  4-  75  de  gastos  de  envío. 

□  Envío  giro  n®  .  por . pesetas. 


SERVICIO  DE  CINTAS 

De  programas  listados  aparecidos  en  Commodore  World 

Título  del  programa  . publicado  en  ne 

Título  del  programa  . . . . . . .  publicado  en  nQ 

Título  del  programa  . . .  publicado  en  nQ 


Precio  por  programa:  995  pesetas.  Gastos  de  envío:  75  pesetas.  Forma  de  pago:  sólo  por  cheque  o  giro. 

Peticionario  . . . . . 

Calle . . . Ne . Teléf. . . 

Población  . . . . C.P . Provincia  ........ . 

□  Incluyo  cheque  por .  pesetas.  Programa  para  VIC-20  □  Programa  para  C-128  □ 

□  Envío  girón® . por . pesetas.  Programa  para  C-64  □  Programa  para  C-16  □ 

Si  se  desea  disco,  acogerse  al  servicio  Commodore  World  en  disco  con  todos  los  programas  del  n9  correspondiente. 


EJEMPLARES  ATRASADOS  DE  “CLUB  COMMODORE” 

Primera  época  (septiembre  1982  -  enero  1984) 

Para  poder  satisfacer  la  creciente  demanda  de  Club  Commodore,  agotada  en  todos  sus  números,  hemos  puesto  en  marcha  un 
Servicio  para  suministrar  fotocopias  de  los  ejemplares  que  nos  sean  solicitados. 

SERVICIO  DE  FOTOCOPIAS  -  NUMERO  DE  LA  EDICION  SOLICITADA 


0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

Peticionario  v . . . . 

Calle . . . . . .  NQ . Teléf. 

Población  . . . . C.P . Provincia . 

Forma  de  pago  sólo  por  cheque  Precio  de  la  edición  fotocopiada:  295  ptas. 

La  colección  completa  del  0  al  15:  2.950  ptas.  +  150  ptas.  por  gastos  de  envío. 

Incluyo  cheque  por . . ptas.  Envío  giro  n® . por .  pesetas. 


Clave  para  interpretar  los  listados 


Todos  los  listados  que  se 

publican  en  esta  revista  han 
sido  ejecutados  en  el 
modelo  correspondiente  de 
los  ordenadores 

Commodore.  Para  facilitar  la  edición 
de  los  mismos  y  para  mejorar  su 
legibilidad  por  parte  del  usuario,  se  les 
ha  sometido  a  ciertas  modificaciones 
mediante  un  programa  escrito 
especialmente  para  ello.  Dado  que  los 
ordenadores  Commodore  utili/an 
frecuentemente  las  posibilidades 
gráficas  del  teclado,  se  han  sustituido 
los  símbolos  gráficos  por  una  serie  de 
equivalencias  entre  corchetes  que 
indican  la  secuencia  de  teclas  que  se 


deben  pulsar  para  obtener  dichos 
caracteres.  A  continuación  tenéis  una 
tabla  para  aclarar  la  interpretación  de 
las  claves: 

[CRSRD]  =  Tecla  cursor  abajo 
(sin  shift). 

[CRSRU]  = 

Tecla  cursor 
arriba  (con  shift). 

[CRSRR]  = 

Tecla  cursor 
derecha 
(sin  shift). 

[CRSRL]  = 

Tecla  cursor 
izquierda 
(con  shift). 


[HOME]  =  Tecla  CI.R  HOME  sin 
shift. 

[CER]  =  Tecla  CLR/HOME  con 
shift. 

[SPC]  =  Barra  espaciadora.  Cuando 
se  trata  de  un  solo  espacio  no  aparece. 


1  REM  "PtREtLIU" 

.113 

2  REM  POR  JAMES  E.  BORDEN,  RUN  EEUU 

.  96 

3  REM  (01986  COMMODORE  WORLD 

.  157 

4  s 

.  236 

5  P0KE56 , PEEK ( 56 ) - 1 : P0KE52 , PEEK ( 56 ) 

.119 

6  CLR: PG=PEEk (56) : ML=PG*256+60 

.  232 

7  : 

.  239 

8  P=ML : L=24 

.  216 

9  S=0:FDRI=0T06: READA: IFA=-1THEN16 

.59 

10  I FA<  OORA  >255THEN 1 4 

.  1  46 

11  POKEP+I , A: S=S+A: NEXT 

.81 

12  READSC: IFS< >SCTHEN 14 

.  250 

13  L=L+1 : p=P+7 : G0T09 

.  97 

14  PR I NT "ERROR  EN  DATAS  LINEA" ;L: EN 

D 

.  60 

15  : 

.  247 

16  POKEML+4 , PG: POKEML+1 0 , PG 

.  60 

17  POKEML+ 16, PG: P0KEML+20 , PG 

.  221 

18  POk.EML  +  32  ,  PG:  P0KEML.  +  38  ,  PG 

.  1  1 0 

19  POKEML+l 41 ,PG 

.  97 

20  SYSML: PRINT" C CRSRD 3  [ WHT  3C0RRECT 

.  98 

OR  ACTIVADO 

21  PRINT"  SYS"ML"=CONECTAR 

.  127 

22  PRINT"  SYS " ML+30 " =DESCONECT AR C CO 

.  122 

MM7  3 

23  : 

.  255 

24  DATA173,5,3,201 ,3,208, 1 ,594 

.22 

25  DAT A96, 141 , 105,3, 173,4,3,525 

.  181 

26  DAT  A 1 4 1 , 1 04 , 3 , 1 62 , 1 03 , 1 60 , 3 , 676 

.  214 

27  DATA 142, 4, 3, 140,5,3,96,393 

.  177 

28  DAT A234 , 234 ,173,104,3,141,4, 893 

.96 

29  DATA3, 173, 105,3, 141 ,5,3,433 

.  177 

30  DAT A96 ,32,124,165,132,11,162,722 

.  18 

31  DAT  AO , 142,240,3, 142,241,3,771 

.  87 

32  DAT  A 1 89 , 0 , 2 , 240 ,51,201,32,715 

.  16é 

33  DAT A208 ,4,164,212, 240 ,40,201,106 

9 

.  177 

34  DAT A34 , 208 ,8,72, 165,212,73,772 

.  146 

35  DAT  A 1 , 1 33 , 2 1 2 , 1 04 , 72 , 238 ,241,100 
\ 

.237 

36  DATA3, 173,241 ,3,41 ,7, 168,636 

.  142 

37  DATA 104, 24, 72,24, 104, 16, 1 ,345 

.225 

38  DATA56 ,42,136,16, 246 ,109, 240 , 845 

.238 

39  DAT A3 ,141, 240 , 3 , 232 , 208 , 200 ,1027 

.  123 

40  DATA1 73 , 240 ,3,24, 101 ,20,24,585 

.  72 

41  DATA101 ,21 ,141,240,3,169,42,717 

.  49 

42  DAT A32 ,210, 255 , 169,0,174,240, 108 
o 

.  170 

43  DAT A3 , 32 , 205 ,189,162,4,189, 784 

.83 

44  DATA21 1 ,3,32,210,255,202,16,929 

.  214 

45  DAT A247 , 164,11,96, 145,13,32,708 

.87 

46  DAT A32 ,0,0, 0,0, 0,0, 32 , — 1 

.  146 

REM  "PERFECTO"  VERSION  C-12B 
REM  POR  JAMES  E.  BORDEN,  RUN  EEUU 
REM  (0  1986  COMMODORE  WORLD 


.  197 
.  96 
.  157 
.  236 
.  165 
.  182 
.  205 
.78 
.53 
.222 
.  57 

.  244 
.  123 

.234 
.  171 

.90 
.249 
.  232 
.  79 


P=5 1 20: L  =  1 8 

S=0: FOR I =0T06: READA:  I FA=- 1  THE  N 1 3 
I FA<  OORA  >255THEN 1 1 
POKEP-U  , A: S=S+A:  NEX1 
READSC : IFS<  >SCTHEN1 1 

10  L=L+1:P=P+7:S0T06 

11  PRI NT "ERROR  EN  DATAS  L 1 NEA" ; Ls EN 
D 

12  : 

13  PR I  NT " C CRSRD D  t YEL 3 CORRECTOR  ACT 
1  VADO 

14  PRINT"  SYS  5120  =CONECT AR 

15  PRINT"  SYS  5150  =DESCONE.CT  ARC  COM 
M6  3 

16  SYS51 20: NEW 

17  : 

18  DATA  173,5,3,201,20,208,1,611 

19  DATA  96,141,45,20,173,4,3,482 

20  DATA  141,44,20,162,43,160,20,590  .230 

21  DATA  142,4,3,140,5,3,96,393  .171 

22  DATA  234,234,173,44,20,141,4,850  .48 

23  DATA  3,173,45,20,141,5,3,390  .255 

24  DATA  96,32,13,67,140,255,19,622  .254 

25  DATA  162,0,142,252,19,142,253,97  .63 
O 

26  DATA  19,1 42  t254 ,19,1 89 ,0,2, 625  .16 

27  DATA  201,32,240,8,201,48,144,874  .221 

28  DATA  7,201,58,176,3,232,208,885  .200 

29  DATA  238,189,0,2,240,54,201,924  .71 

30  DATA  32,208,5,172,254,19,240,930  .238 

31  DATA  42,201,34,208,10,72,173,740  .165 

32  DATA  254,19,73,1,141,254,19,761  .92 

33  DATA  104,72,238,253,19,173,253,1  .109 
1  12 

34  DATA  19,41,7,168,104,24,72,435  .244 

35  DATA  24,104,16,1,56,42,136,379  .121 

36  DATA  16,246,109,252,19,141,252,1  .192 

035 

37  DATA  19,232,208,197,173,252,19,1  .69 

1 00 

38  DATA  24,101,22,24,101,23,141,436  .204 

39  DATA  252,19,169,42,32,241,20,775  .45 

40  DATA  32,188,20,160,2,185,185,772  .168 

41  DATA  20,32,241,20,136,16,247,712  .133 

42  DATA  165,116,208,9,165,117,208,9  .10 
88 

43  DATA  5,169,145,32,241,20,172,784  .101 

44  DATA  255,19,96,13,32,32,162,609  .200 

45  DATA  0,173,252,19,232,56,233,965  .111 

46  DATA  100,176,250,105,100,202,240  .140 
,1173 

47  DATA  3,32,232,20,201,10,176,674  .85 

48  DATA  5,205,252,19,240,15,162,898  .154 

49  DATA  0,232,56,233,10,16,250,797  .105 

50  DATA  24,105,10,202,32,232,20,625  .168 

51  DATA  170,72,138,9,48,32,241,710  .117 

52  DATA  20,104,96,170,173,0,255,818  .210 

53  DATA  72,169,0,141,0,255,138,775  .243 

54  DATA  32,210,255,104,141,0,255,99  .238 
7 

55  DATA  96,49,49,25,255,0,255,729,-  .15 
1 
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También  existe  [SHIFT  SPC],  que  se 
obtiene  pulsando  SHIFT  y  la  barra 
espaciadora  a  la  vez. 

[DEL]  =  Tecla  INST/DEL  sin  shift. 
Para  obtener  este  carácter  hay  que 
pulsar  antes  ÍINST]. 

[INST]=Tecla  INST/DEL  con  shift. 

[BLK]  a  [YEL]  corresponden  a  los 
colores,  pulsando  a  la  vez  la  tecla 
CTRL  y  un  número  del  1  al  8.  Puede 
aparecer  también  como  [CTRL  I]  o 
[CTRL  7]. 

[RVS  ON]  y  [RVS  OFF] 
corresponden  a  CTRL  con  las  teclas  8 
ó  9. 

[Fl]  a  [F8]  corresponden  a  las  teclas 
de  función. 

Todos  estos  caracteres  aparecen  en 
la  pantalla  como  letras  o  gráficos  en 
vídeo  inverso. 

[FLCH  ARRIBA]  =  Tecla  de  flecha 
arriba. 

[FLCH  IZQ]  =  Tecla  de  Hecha 
izquierda. 

[PI]=Tecla  de  Hecha  arriba  con  shift. 

[LIBRA]  =  Tecla  signo  de  libra 
esterlina. 

Estos  cuatro  aparecen  en  la  pantalla 
como  están  dibujados  sobre  las  teclas. 

[BELL]  =  Tecla  G  con  control. 

[TAB]  =  Tecla  TAB  o  tecla  I  con 
control. 

[LFEED]  =  Tecla  LINF.  FEED 
o  tecla  J  con  control. 

Y  esta  última  tanda  de  cuatro  que 
sólo  son  para  programas  del  C-128,  en 
modo  128. 

El  resto  de  las  claves  constan 
siempre  de  una  letra  o  símbolo 
precedidos  de  las  palabras  COMM 
o  SHIFT,  por  ejemplo  [COMM+] 
o  [SHIFT  A].  Esto  indica  que  para 
obtener  el  gráfico  necesario  hay  que 
pulsar  a  la  vez  la  tecla 
COMMODORE  (abajo  a  la  izquierda) 
o  la  tecla  SHIFT  (cualquiera  de  ellas) 


NUEVA  MODALIDAD  DE  COLABORACION 


Al  desaparecer  la  antigua  sección  de  colaboraciones,  los  programas,  ideas 
o  juegos  que  nos  enviéis  se  publicarán  en  forma  de  artículo,  siempre  que 
tengan  nivel  suficiente  y  estén  bien  documentados. 

Los  premios  serán  de  3.000,  5.000  ó  10.000  pesetas,  según  la  calidad  y  el 
trabajo  que  hayáis  puesto  en  su  realización. 

Envía  tu  artículo  y  una  cinta  o  disco  con  el  programa  (no  hace  falta 
listado)  a: 


Commodore  World  -  Redacción. 
C/  Rafael  Calvo ,  18  -  4^  B. 
28010  Madrid 


junto  con  la  letra  o  símbolo 
correspondiente. 

También  puede  aparecer  un  número 
indicando  cuántas  veces  hay  que 
repetir  el  carácter.  [7  CRSRR] 
equivale  a  siete  cursores  a  la  derecha  y 
[3  SPC]  a  tres  pulsaciones  de  la  barra 
espaciadora. 

Cómo  utilizar 
la  suma  de  control 

Todos  los  listados  para  C-64  o  C- 
128  que  aparecen  en  la  revista  llevan 
una  suma  de  control  para  que  no  te 
equivoques  a  la  hora  de  teclearlos. 

Para  poder  utilizar  esta  suma  de 
control  tendrás  que  teclear  el 
programa  que  aparece  aquí  listado.  Se 
llama  “Perfecto”.  Cuando  lo  hayas 
tecleado,  compruébalo  y  sálvalo  en 
disco  o  cinta. 

Cada  vez  que  vayas  a  teclear  uno  de 
los  programas  que  aparecen  en 
Commodore  World  debes  cargar  antes 
el  programa  corrector.  Apunta  los  dos 
valores  SYS  que  aparezcan  en  la 
pantalla,  pues  te  servirán  para 
conectar  o  desconectar  el  programa 
cuando  quieras. 

Verás  que  a  la  derecha  de  todos  los 
listados  aparece  un  punto  seguido  de 


un  número.  Eso  no  debes  teclearlo, 
pues  en  tal  caso  el  programa  no  te 
funcionaría.  Comienza  a  teclear  el 
listado  normalmente.  La  única 
diferencia  que  notarás  es  que  al  pulsar 
RETURN  aparecerá  un  asterisco 
seguido  de  un  número  de  una,  dos  o 
tres  cifras  debajo  del  cursor.  Es  la 
suma  de  control.  Compárala  con  el 
número  que  aparece  en  la  parte 
derecha  del  listado.  Si  es  el  mismo, 
puedes  seguir  tecleando,  pero  si  es 
diferente  deberás  buscar  errores  en  la 
línea  que  acabes  de  introducir. 

Observa  sobre  todo  los  siguientes 
puntos: 

•  Los  espacios  sólo  se  tienen  en 
cuenta  si  van  entre  comillas.  Los 
demás  los  puedes  omitir.  Si  tienes 
problemas  con  alguna  línea  tecléala  tal 
y  como  aparece  en  el  listado,  ¡teniendo 
en  cuenta  las  claves,  por  supuesto! 

•  Los  comandos  Basic  se  pueden 
abreviar,  de  modo  que  puedes  poner  ? 
en  vez  de  PRINT  o  P[SHIFT  O]  en 
vez  de  POKE. 

•  También  se  tiene  en  cuenta  el 
número  de  línea.  Si  por  error 
introduces  la  línea  100  en  vez  de  la 
1000,  por  ejemplo,  tendrás  que  teclear 
nuevamente  la  línea  100  (que  se  habrá 
borrado)  y  a  continuación  la  1000.B 
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□  NUEVA  SUSCRIPCION  U  RENOVACION  DESEO  SUSCRIBIRME  A 
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□  RENOVACION 


POBLACION 


TELEF . . . MARCA  Y  MODELO  DEL  ORDENADOR 


CHO,  NO  SOLO  A  RECIBIR 


CIUDAD  DONDE  LO  COMPRO - - - - DISTRIBUIDOR _  LA  REVISTA  (ONCE  NU- 

APLICACIONES  A  LAS  QUE  PIENSA  DESTINAR  EL  EQUIPO _ _  MEROS  ANUALES)  SINO  A 

PARTICIPAR  EN  LAS  ACTI- 
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Reembolso  más  gatos  del  mismo  BASIC,  INTERCAMBIOS  DE 

al  recibir  el  primer  n°  de  la  suscripción -  □  PROGRAMAS,  CONCURSOS. 

ETCETERA. 


La  transmisión  de  datos  entre  ordenadores  es  uno  de 
los  temas  más  interesantes  en  el  mundo  de  la  informá¬ 
tica.  A  través  de  un  modem  o  radio-teletipo  pueden 
pasar  cantidades  ingentes  de  información.  También  se 
pueden  transferir  por  medio  de  una  cinta  o  disco 
magnético.  Esto  último  no  siempre  es  posible,  debido 
a  incompatibilidades  de  formato.  Nosotros  haremos 
una  conexión  directa  en  paralelo  entre  dos  ordenado¬ 
res  C-64. 


Por  Alvaro  Ibáñez 
C-64 


ENTRE 

ORDENADORES 


La  conexión  de  dos  ordenadores  para 
que  intercambien  información  es  bas¬ 
tante  sencilla,  contra  lo  que  se  puede 
pensar  en  un  principio.  Con  un  pro¬ 
grama  emisor,  un  programa  receptor  y 
el  hardware  adecuado  (se  necesita  tan 
sólo  un  cable)  se  pueden  transferir  datos 
a  velocidades  increíbles.  En  nuestro 
caso,  utilizando  dos  C-64  se  pueden  lle¬ 
gar  a  transferir  48  Kbytes  en  poco  más 
de  6  segundos. 

Las  aplicaciones  prácticas  de  este 
montaje  son  muy  variadas:  desde  la  uti¬ 
lización  de  dos  ordenadores  para  la 
creación  de  programas  hasta  la  lectura 
de  ficheros  de  datos  de  otros  ordenado¬ 
res  cuyo  formato  de  cinta  o  disco  sea 
incompatible  (un  Vic-20  o  C-16,  por 
ejemplo).  Estas  posibilidades  se  estudia¬ 
rán  al  final  del  artículo. 

¿Cómo  se  hace? 

Fundamentos  teóricos 


Hay  dos  formas  básicas  de 
transmitir  datos:  en  serie  o 
en  paralelo.  En  el  primer 
caso  los  datos  van  uno  de¬ 
trás  de  otro,  bit  a  bit, 
mientras  que  en  la  trans¬ 
misión  en  paralelo  pueden 
enviarse  bytes  (8  bits)  de 
una  sola  vez.  En  este 
montaje  se  ha  utilizado 
este  último  sistema,  pues 
además  de  más  rápido  es 
considerablemente  más 
sencillo.  El  interface  parale¬ 
lo  también  se  conoce 
como  interface  CEN¬ 
TRONICS,  y  es  un  stan¬ 
dard  universalmente  aceptado. 

En  un  interface  Centronics  hay  once 
líneas  básicas  (en  realidad  se  utilizan 
más,  pero  en  nuestro  caso  once  son  sufi¬ 
cientes),  cada  una  de  las  cuales  tiene  una 
función  distinta.  Una  es  la  toma  de  tie¬ 
rra,  ocho  son  las  que  llevan  los  8  bits  de 
datos  y  las  otras  dos  se  utilizan  con  fines 
de  “handshaking”  (literalmente  “darse 
la  mano”)  entre  emisor  y  receptor;  sir¬ 
ven  para  que  ambos  se  indiquen 
mutuamente  cuándo  están  listos  para 
recibir  datos  o  cuándo  los  han  emitido. 

Lo  que  sucede  en  una  comunicación 
en  paralelo  es  lo  siguiente:  el  emisor 
(por  ejemplo,  un  ordenador)  coloca  en 
las  ocho  líneas  de  datos  el  byte  que  va  a 
enviar,  un  bit  en  cada  línea,  dado  que 
sólo  pueden  almacenar  un  0  o  un  1.  A 
continuación  emite  una  señal  por  una 
de  las  dos  líneas  de  “handshaking”,  lla¬ 
mada  STROBE.  Esto  quiere  decir  que 
el  dato  está  listo  y  que  el  receptor  (una 
impresora,  por  ejemplo)  puede  leerlo. 
Si  no  hubiera  señal  STROBE  la  impreso¬ 
ra  no  sabría  si  hay  datos  o  no  en  la  línea. 

Cuando  la  impresora  recibe  el  STRO¬ 
BE,  lee  el  byte  que  se  encuentra  en  la 
línea  de  datos  y  emite  una  señal  llamada 
BUSY  por  la  otra  línea  de  “handsha¬ 
king”  Esta  señal  indica  al  ordenador 
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que  debe  esperar,  pues  se  está  traba¬ 
jando  con  el  dato.  Que  la  señal  BUSY  se 
mantenga  por  mucho  o  poco  tiempo 
puede  ser  debido  a  varias  razones:  que 
se  esté  imprimiendo  una  línea  en  ese 
momento,  que  la  impresora  esté  OFF- 
LINE  por  cualquier  razón  (fin  de  papel, 
por  ejemplo)  o  que  esté  haciendo  un 
avance  de  página. 

Hasta  que  la  impresora  no  apaga  la 
señal  BUSY  el  ordenador  tiene  que 
esperar.  Una  vez  apagada,  se  vuelve  otra 
vez  a  la  situación  del  principio  y  se  envía 
el  dato  siguiente. 


del  ordenador  va  “negada”,  es  decir,  que 
se  considera  apagada  cuando  está  a 
nivel  alto  y  encendida  cuando  está  a 
nivel  bajo.  La  subida  y  bajada  de  nivel 
para  indicar  que  hay  un  dato  listo  ha  de 
durar  al  menos  1  microsegundo  para 
que  la  impresora  pueda  enterarse. 

La  impresora  es  en  este  caso  un  recep¬ 
tor  nato.  Está  costantemente  a  la  espera 
de  recibir  un  STROBE 
que  le  indique  que  hay 
datos  listos.  El  orde¬ 
nador  en  cambio 
puede  enviar  datos 
cuando  quiera, 
siempre  que  es¬ 
pere  a  que  la 
impresora  le 
diga  que  es¬ 
tá  lista.  En 
nuestro 


Esto  es  más  o 
menos  un  inter¬ 
face  Centronics. 
En  la  realidad 
hay  algunos  de¬ 
talles  más  a 
tener  en  cuen¬ 
ta:  la  señal 
STROBE 


mos  considerado  al  ordenador  como  un 
emisor  y  a  la  impresora  como  un  recep¬ 
tor.  Lo  que  vamos  a  hacer  con  el 
siguiente  montaje  y  el  programa  va  a  ser 
crear  un  “emisor  Centronics”  y  un 
“receptor-centronics”,  este  último  de 
mucha  mayor  importancia,  pues  nos  va 
a  permitir  utilizar  nuestro  C-64  como  si 
fuera  una  impresora,  y  por  lo  tanto 
vamos  a  poder  conectarlo  a  otro  C-64 
que  tenga  una  salida  Centronics,  lo  cual 
se  puede  conseguir  con  el  programa 
adecuado,  o  un  interface  por  hard¬ 
ware. 

El  hardware. 
Conexiones 
cable 
a  cable 

La  par¬ 
te  de 
hard¬ 
ware 
de  es¬ 
te  mon¬ 
taje  es 
bien  sen¬ 
cilla.  No 
hay  que  ha¬ 
cer  placas, 
ni  siquiera 
instalar  com¬ 
ponentes.  Basta 
con  comprar  los 
conectores  y  unos  cuan¬ 
tos  metros  de  cable  plano 
o,  en  su  defecto,  cable  con 
al  menos  1 1  hilos. 

Para  conectar  dos  C-64 
necesitarás  dos  conectores  de 
2  pines  que  encajen  en  el  port 
del  usuario,  y  realizar  las  conexio¬ 
nes  como  se  indica  en  la  figura  1 . 
Para  evitar  confusiones,  el  dibujo 
del  conector  y  la  descripción  de  cada 
pin  está  en  las  figura  2. 

Procura  no  equivocarte  al  realizar  las 
soldaduras,  sobre  todo  con  las  líneas  A 
(tierra)  B  (FLAG2)  y  M  (PA2)  pues  son 
las  más  sensibles.  Procura  no  cruzar 
tampoco  las  líneas  de  datos  C-L, 
pues  serías  incapaz  de  interpretar 
los  datos  después  (por  cierto, 
esto  se  utiliza  a  veces  como 
sistema  de  cifrado  y  protec¬ 
ción).  Utiliza  una  caja  o 
algo  parecido  para  fijar 
los  conectores,  de  lo 
contrario  te  será 
muy  difícil  sacar¬ 
los  del  orde¬ 
nador.  Ten 
mucho  cui¬ 
dado  al 
conec- 
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Conexiones  interface 

C-64/ C-64 

A _ 

_ A 

B  _ 

_ M 

C _ 

_ C 

D _ 

_ D 

E  _ 

_  E 

F  _ 

_  F 

H  _ 

_  H 

J  _ 

_  J 

K  _ 

_ K 

L  _ 

_  L 

M _ 

-  B  Fig.  1 

tar  o  desconectar  los  cables  mientras  el 
ordenador  esté  encendido,  pues  podrías 
estropearlo. 

De  Commodore  a  Commodore. 

La  transferencia  de  programas 

Vamos  a  estudiar  en  primer  lugar  la 
transferencia  de  programas  entre  dos 
C-64.  Básicamente  se  trata  de  enviar  una 
zona  de  memoria  al  otro  ordenador. 
Para  ello  se  utiliza  el  programa  IN- 
TERFACE  CENTRONICS  IN/OUT 
(listado  1).  Se  trata  de  un  programa  que 
contiene  a  la  vez  un  EMISOR  y  un 
RECEPTOR,  y  que  debe  ser  cargado  en 
ambos  ordenadores  al  comenzar  a  tra¬ 
bajar.  La  rutina,  que  está  en  c.m.  por 
cuestiones  de  velocidad,  se  ubica  en 
$C000,  por  lo  que  no  interfiere  con  los 
programas  Basic. 

Los  comandos  que  reconoce  este  pro¬ 
grama  son  los  siguientes: 

SYS  49152  —  Emite  el  programa 
Basic  que  esté  en  memoria. 

SYS  49152,  <inicio>,  <final>  - 
Emite  una  zona  de  memoria. 

SYS  49155  —  Recibe  un  programa 
Basic  o  una  zona  de  memoria. 

SYS  49158  —  Recibe  un  byte  (utili¬ 
zado  para  recibir  datos). 

Antes  de  emitir  o  recibir  conviene 
hacer  STOP/ RESTORE  a  ambos  or¬ 
denadores,  para  evitar  que  se  quede 


algún  byte  “en  el  aire”  y  estropee  la 
transmisión.  A  continuación  se  debe 
conectar  el  programa  en  el  ordenador 
receptor  con  SYS  49155  (en  modo 
directo  o  por  programa).  El  ordenador 
se  quedará  esperando  recibir  datos. 
Entonces  debes  comenzar  a  emitir,  desde 
el  otro  ordenador,  mediante  SYS 
49152,8192,32768  (por  ejemplo).  En  la 
pantalla  del  emisor  aparecerá:  “EMI¬ 
TIENDO:  $2000-58000”  y  en  la  del  re¬ 
ceptor:  “RECIBIENDO:  $2000-$8000”. 

Puede  suceder  que  a  veces  se  queden 
“colgados”  uno  u  otro,  por  cualquier 
razón  (algún  dato  que  se  ha  esfumado). 
En  este  caso  debes  parar  ambos  pro¬ 
gramas  con  STOP  y  comenzar  de 
nuevo,  sin  olvidarte  del  STOP/ RES¬ 
TORE.  Lo  más  importante  de  todo  es 
NO  EMITIR  SIMULTANEAMENTE 
POR  AMBOS  ORDENADORES  pues 
podrían  llegar  a  estropearse  al  poco 
tiempo,  por  cortocircuito.  Haciendo 
STOP/ RESTORE  el  ordenador  se 
configura  automáticamente  como  re¬ 
ceptor,  evitando  este  tipo  de  daños.  Este 
pequeño  problema  (si  se  tiene  cuidado 
no  es  nada  peligroso)  se  puede  evitar 
por  hardware  colocando  unas  puertas 
lógicas  que  desconecten  las  líneas  de 
datos  al  detectar  dos  STROBES  simul¬ 
táneos.  Esto  último  lo  dejaremos  para 
nuestros  amigos  los  “electrónicos”. 

Con  el  comando  SYS  49152,  inicio, 
final  pueden  transferirse  zonas  de 
memoria,  programas  en  c.m.,  pantallas, 
etc.  Por  defecto  se  toman  las  direcciones 
de  inicio  y  final  del  programa  Basic  que 
esté  en  memoria.  Al  recibir  los  datos,  se 
colocan  en  el  mismo  lugar  de  la  memo¬ 
ria  en  que  estaban  situados  en  el  orde¬ 
nador  emisor.  Si  te  fijas  en  la  conexión 
verás  que  es  simétrica,  de  modo  que 
cualquiera  de  los  dos  C-64  puede  ser  el 
emisor  o  el  receptor»  tan  sólo  tienes  que 
tener  cuidado  para  que  no  emitan 
simultáneamente.  Haciendo  POKE 
49152,0  en  el  ordenador  receptor  evita¬ 
rás  meter  la  pata. 

Trabajando  como  una  impresora- 
La  transferencia 
de  datos 


tido  por  otro  ordenador.  El  valor  de 
este  byte  se  almacena  en  el  acumulador, 
y  puede  leerse  con  la  instrucción 
PEEK(780).  La  siguiente  línea  se  encar¬ 
ga  de  imprimir  en  ASCII  todos  los 
datos  que  recibe  (en  este  sentido  fun¬ 
ciona  como  una  impresora  con  salida 
por  pantalla). 

1  SYS  49158:PRINTCHR$(PEEK 
(780));:GOTOl 

Puedes  probarlo  emitiendo  un  fichero 
de  datos  con  otro  C-64  (OPEN  y  CMD 
o  PRINT#).  Verás  cómo  aparece,  aun¬ 
que  más  lentamente,  por  la  pantalla.  Si 
hay  códigos  de  control  es  posible  que 
comience  a  hacer  cosas  raras,  como 
cambiar  de  color,  etc.  Esto  es  porque 
estás  imprimiendo  tal  cual  todo  lo  que 
recibes.  Es  conveniente  utilizar  pues  un 
FILTRO,  como  el  del  listado  3,  que 
elimine  dichos  caracteres  y  que  de  paso 
convierta  el  ASCII  standard  a  ASCII 
Commodore  (esto  lo  necesitarás  si  tra¬ 
bajas  con  procesadores  de  texto).  Este 
filtro  debe  utilizarse  con  ficheros  de 
texto.  La  salida,  en  vez  de  ser  un  sim¬ 
ple  PRINT  puede  desviarse  a  otro  peri¬ 
férico,  como  la  unidad  de  discos  o  la 
impresora,  mediante  los  comandos 
OPEN  y  PRINT#  o  CMD.  La  conver¬ 
sión  de  caracteres  acentuados  y  cosas 
por  el  estilo  al  ASCII  Commodore 
depende  del  formato  de  los  datos,  y  no 
es  nada  difícil  de  hacer  en  Basic.  Ten  en 
cuenta  que  cuanto  más  complicado  sea 
el  filtro,  será  también  más  lento. 

Para  hacer  pruebas  puedes  utilizar  un 
C-64  con  Final  Catridge  (o  un  interface 
Centronics  corriente,  SECUS-DATA  por 
ejemplo)  y  otro  C-64  como  receptor. 
Bastará  con  que  hagas  OPEN  1 ,4:CMD  1 
para  que  veas  aparecer  el  “READY.”  en 
la  pantalla  del  receptor.  Si  envías  lista¬ 
dos  por  este  sistema,  los  recibirás  como 
ASCII,  no  como  programas.  Poste¬ 
riormente  tendrás  que  convertirlos  “a 
mano”  o  utilizando  técnicas  del  “teclado 
dinámico”  (buffer  del  teclado). 

Cómo  funciona* 
Explicación  de  la  rutina 

El  listado  2  es  un  desensamblado  de 
la  rutina,  en  código  fuente.  Está  comen¬ 
tada  para  que  puedas  ver  más  o  menos 
cómo  funciona.  Aquí  diré  algo  sobre 
cómo  se  envían  los  datos. 


Port  del  usuario  Fig.  2 
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El  comando  SYS 
49158  sirve  para 
leer  un  byte  emi¬ 


PROGRAMA:  INTERFACE  LISTADO  1 

10  REM  INTERFACE  CENTRONICS  IN-OUT  .102 

11  «  .243 

12  REM  (0  1987  BY  ALVARO  IBANEZ  .162 

13  REM  <0  1987  BY  COMMODORE  WORLD  .25 

14  t  .246 

1 5  FOR I -49 1 52T049547  .  1 69 

16  RE ADA i POKE I  ,  A  i S=S+ A i NE X T  .76 

17  I FS< >523 17THENPRI NT "ERROR  DATAS"  .179 

18  END  .20 

19  i  .251 

20  DATA  76,197,192,76,20,192,169  .114 

21  DATA  0,141,3,221,169,4,141  .125 

22  DATA  2,221,32,111,192,96,169  .174 


l—  10/Commodore  World 


¿Sabe  por  qué  los  accesorios  y  utilidades  de  HISPASOFT para  COMMODORE  son 
los  más  vendidos  en  ESPAÑA? 

—  Porque  buscamos  siempre  los  mejores  productos ,  o  los  que  mejor  relación  calidad- 
precio  tienen . 

—  Porque  ahora ,  en  ESPAÑA ,  los  usuarios  de  COMMODORE  entendéis  mucho  de 
COMMODORE... 

Por  ello ,  hemos  decidido  dar  el  salto ,  traer  lo  mejor  de  lo  mejor ,  sólo  para  conocedo¬ 
res ,  como  os  lo  merecéis:  Productos  más  técnicos ,  que  os  permitirán  sacarle  todo  el  jugo  a 
este  maravilloso  64. 

Esperamos  sean  de  vuestro  agrado. 

El  equipo  de  HISPASOFT 


LA  NUEVA 
UNIDAD  DE  DISCOS 
PARA  SU  64 

1)  Mucho  más  pequeña.  ARGOS  es 
tan  pequeña  que  ni  se  lo  va  a  creer... 

(268X150X47,5  mm.).  Cabe  en  cual¬ 
quier  sitio  y  funciona  también  verti¬ 
calmente. 

2)  No  se  calienta.  Podrá  dejar 
ARGOS  en  funcionamiento  todo  el 
tiempo  que  quiera,  apilar  todas  las 
unidades  que  quiera,  nunca  se  le  va  a 
calentar  porque  tiene  la  alimentación 
separada. 

3)  Formatea  un  disco  en  sólo  20 
segundos,  además  sin  ningún  ruido 
desagradable. 

4)  ARGOS  es  silenciosa  y  tiene  un  cabezal  muy  preciso. 

5)  ARGOS  tiene  una  carcasa  metálica.  Puede  colocarla  donde  quiera,  no  provocará  ni  recibirá  interferencias. 

6)  Es  compatible  a  99,9%  (el  0,1%  por  si  acaso...).  Ha  funcionado  a  la  perfección  con  todos  los  programas  que 
hayamos  podido  probar. 

7)  ARGOS  tiene  un  precio  muy  competitivo,  que  sepamos  sin  competencia  en  el  mercado. 

ARGOS:  37.900  Ptas. 


ARGOS  PLUS 

Una  pequeña  joya...  ARGOS  PLUS  conserva  todas  las  cualidades  de  ARGOS,  pero  incorpora  un  nuevo  DOS  que 
transmite  los  datos  en  paralelo...  y  esto  es  mucho  más  rápido. 

ARGOS  PLUS  carga  los  programas  8  veces  más  rápido  que  la  1541,  con  una  compatibilidad  asombrosa.  Además 
lleva  comandos  de  disco  simplificados,  teclas  de  función  preprogramadas,  etc. 

ARGOS  PLUS:  44.900  Ptas. 

Nota:  Para  conectar  ARGOS  PLUS,  necesita  levantar  la  ROM  del  KERNAL  de  su  64.  Se  trata  de  una  operación 
sencilla  perfectamente  explicada  en  el  manual  de  instrucciones.  En  todo  caso,  cualquier  técnico  puede  realizar  esta 
operación  en  pocos  minutos.  También  se  lo  podemos  hacer,  por  supuesto... 


SOMOS  ESPECIALISTAS 
EN  COMMODORE  PC 


LOTO 


SUPER-PRO 


INDISPENSABLE  PARA  PEÑAS  Y  JUGADORES  “SERIOS” 

LA  CULMINACION  DE  VARIOS  MESES  DE  TRABAJO  DE  UN 


I  J 1  ;*•! ']  I  q ;  i  <  U  2  J  :l*in  ’j-VJA  t 1 


LOTO  super-pro  es  el  programa  MAS  COMPLETO  y  EFICAZ  que  se  pueda  encon¬ 
trar  en  la  actualidad.  Es  más  potente  que  todos  los  programas  que  hayamos  podido 
probar  con  ordenadores  mucho  más  caros. 

MATERIAL  REQUERIDO 

•  I  Commodore  64  ó  128. 

•  I  unidad  de  discos  1541,  1570  ó  1571. 

•  I  impresora  con  fricción. 

CARACTERISTICAS 

•  Combinaciones  ilimitadas. 

•  Posibilidad  de  jugar  de  7  hasta  49  números. 

•  De  I  hasta  6  grupos. 

•  8  tipos  de  filtros  selectivos. 

•  Utilización  de  filtros  opcional. 

•  Reducciones  ilimitadas  al  5,  4,  3. 

•  7  clases  de  estadísticas  (con  gráficos). 

•  Verificación  automática  del  escrutinio. 

•  Actualización  automática  de  estadísticas. 

•  Generación  de  informes. 

•  Impresión  directa  de  los  boletos  (aprox.  200  hora)  con  impresoras  STAR,  RITE- 
MAN...,  o  cualquier  impresora  Centronics. 

•  Extenso  manual  de  instrucciones. 

•  Manejo  sencillo. 

Gracias  a  su  sistema  de  filtros  muy  elaborados.  LOTO  super-pro  multiplica  conside¬ 
rablemente  sus  posibilidades  de  acierto.  Es  una  inversión  MUY  RENTABLE  e 
INDISPENSABLE  para  todas  las  peñas  y  los  jugadores  “serios". 

Precio:  1 6.000  Ptas. 

LOTERIA 
PRIMITIVA  2 

Otro  programa  de  Loto,  más  sencillo  que  el  anterior. 


CARACTERISTICAS 

•  Desarrollo  de  combinaciones. 

•  4  filtros. 

•  Numerosas  reducciones  prefijadas  al  4  o  al  5 
—  Estadísticas. 

Generación  de  informes. 


En  Diskette 


m 


QUINELA 


SUPER-PRO 


Quiniela  super-pro  es  un  programa  en  la  línea  de  Loto  super-pro.  Permite  preparar 
su  desarrollo,  hacer  sus  reducciones  al  12  o  al  13,  entrar  nuevas  tablas,  hacer  múltiples. 
Por  supuesto,  realizar  escrutinios  e  imprime  los  boletos  con  impresoras  STAR  y 
RITEMAN. 

Sin  lugar  a  dudas,  una  buena  inversión. 

QUINIELA  SUPER-PRO:  16.000  Ptas. 

Disponible:  15-04 


COMMODORE  64  C. 
COMMODORE  128. 

UNIDAD  DE  DISCOS  I541C. 
UNIDAD  DE  DISCOS  1571 
IMPRESORAS  STAR  NL  10,  GEMINI  160 
IMPRESORAS  RITEMAN  SUPER  C-PLUS 
IMPRESORAS  RITEMAN  II 

COMPATIBLES  PC  , 

¡¡Llámenos!! 


DINAMITAMOS  LOS 
PRECIOS 


THE  FINAL  CARTRIDGE 


EL  CARTUCHO  INDISPENSABLE,  CON 

•  TURBO  CINTA.  - 

•  TURBO  DISCO.  A 

•  1NTERFACE  CENTRONICS.  \^Vi  V 

•  VOLCADOS  DE  PANTALLAS. 

•  BASIC  4,0  ' - - 

•  TECLAS  DE  FUNCION  PROGRAMADAS. 

•  24  K  MAS  DESDE  EL  BASIC. 

•  COMANDOS  DE  AYUDA  A  LA 
PROGRAMACION. 

•  MONITOR  DE  CODIGO  MAQUINA. 

•  MONITOR  DE  DISCO. 

•  RESET. 

•  UTILIZACION  DE  LA  IMPRESORA  COMO 
MAQUINA  DE  ESCRIBIR. 

•  GAME  KILLER. 

•  FREEZER  COPIA  DE  CINTA  A  CINTAS. 

“  A  DISCOS. 

9.900  Ptas.  D,s“íKS¡; 


PROFESSIONAL  JOYSTICK 

La  nueva  versión  de  nuestro  famoso  COMPETI¬ 
CION  PRO  5000.  Calidad  excepcional  3.990  Ptas. 

QUICKSHOT  2  PLUS 

Un  quickshot  que  no  tiene  nada  que  ver  con  el  que 
conoce...  6  micro-switches  le  dan  una  precisión 
asombrosa.  Casi  al  precio  de  un  joystick  convencio¬ 
nal.  2.590  Ptas. 

DESCENDER  (impresora  MPS  801...) 

Nuevo  diseño  de  las  letras  de  su  impresora. 
Minúsculas  muy  mejoradas.  Ahora,  la  p  y  la 
q  “bajan"  como  tiene  que  ser.  Incorpora  ñ,  N, 
¿»  i-  3.450  Ptas. 


q  “bajan"  como  tiene  que  ser.  Incorpora  ñ,  N, 
¿>  i-  3.450  Ptas. 

También 

SUPER  GRAPHIX  21.900  Ptas. 

PROTEXT  7.950  Ptas. 

CABLE  40/80  COLUMNAS  (128)  2.850  Ptas. 

CABLE  CENTRONICS  3.450  Ptas. 

SUMATEST  1.990  Ptas. 

KIT  ALINEAMIENTO  ROBTEK  2.350  Ptas. 

RATON  CHEESE  MOUSE  (NEOS)  14.900  Ptas. 

RATON  CHEESE  MOUSE  (NEOS)  (disco)  15.400  Ptas. 
LAPIZ  OPTICO  TROJAN  CADMASTER  5.800  Ptas. 
LASER  1,0  2.995  Ptas. 


CAJAS  DE  10 

CALIDAD 

ESTANDAR 

CALIDAD  SUPER 
DOBLE  CARA 
DOBLE  DENSIDAD 
MARCA  KAO 

DOBLE  CARA 
CUADRUPLE 
DENSIDAD 
96  TPI  (KAO) 


1.750' 

2.900' 

3.900' 


ROM-DISK  GOLIATH  •  1  Mega 

Imagínese...  Hasta  I  megabyte  de  programas,  PERMANENTEMENTE  en  la 
memoria  de  su  64  (ó  128  en  modo  64).  Con  el  ROM-DISK  instalado,  al  encender  el 
ordenador  aparecen  unos  menús  en  pantalla,  indicándole  todos  los  programas 
disponibles. 

Para  cargar  cualquiera  de  ellos,  basta  con  pulsar  una  tecla,...  y  ya  lo  tiene  cargado. 

Un  programa  de  130  bloques  carga  en  0,3  segundo! 

Por  supuesto,  si  desea  cargar  un  programa  desde  cassette  o  disco,  o  trabajar  en 
basic,  puede  hacerlo  como  antes. 

F.I  ROM-DISK  GOLIATH  se  compone  de  una  tarjeta  que  se  enchufa  en  el  port  de 
expansión,  sin  ningún  montaje  (como  un  cartucho).  Lo  único  que  tiene  que  hacer  es 
grabar  sus  programas  en  EPROMS  (2764  hasta  27512).  Para  ello,  puede  utilizar 
nuestro  programador  de  Eproms.  Si  prefiere,  se  lo  haremos  todo.  Vea  nuestro  servi¬ 
cio  GOLIATH... 

16.900  Pías. 

ROM-DISK  -  256  K. 

El  hermano  pequeño  de  GOLIATH... 

Utiliza  las  Eproms  2764  hasta,  27128  ó  27256. 

Mismas  características  que  GOLIATH  excepto  tamaño  y  capacidad. 

10.900  Ptas. 

IMPORTANTE:  Los  ROM-DISKS  se  venden  sin  Eproms.  La  capacidad  indi¬ 
cada  para  ROM-DISK  es  la  capacidad  máxima.  Usted  puede,  por  lo  tanto,  poner  las 
Eproms  que  quiere,  poco  a  poco... 

Por  supuesto,  los  programas  grabados  en  Eproms  no  se  borran  cuando  apaga  el 
ordenador. 

PROGRAMADOR  DE  EPROMS  GOLIATH 

Excepcional:  El  programador  de  Eproms  que  permite  grabar  Eproms  de  hasta  64 
K.  (desde  2764  hasta  27512). 

12,5  y  21  voltios. 

Conexión  al  port  del  usuario. 

Uso  sencillo.  Manual  y  software  en  castellano  (disco  o  Eprom). 

15.900  Ptas. 

EXPANSION  PARA  5  CARTUCHOS 

Permite  enchufar  a  la  vez  hasta  5  cartuchos.  Puede  seleccionar  el  que  desea  utilizar 
mediante  unos  interruptores. 

10.900  Ptas. 


PROLOGIC  DOS  CLASSIC 

Un  DOS  absolutamente  impresionante  para  su 
unidad  de  discos. 

Carga  los  programas  65  veces  más  rápido. 

Salva  sin  verificar  65  veces  más  rápido. 

Salva  y  verifica  30  veces  más  rápido. 

Lee  y  graba  ficheros  (SEQ  y  REL)  30  veces 
más  rápido  (15  veces  con  verify). 

Formatea  en  12  segundos  en  35  ó  40  pistas. 

V  mucho  más... 

PROLOGIC  DOS  CLASSIC:  27.900  Ptas. 

PROLOGIC  DOS  L.C. 

Una  versión  más  económica,  pero  con  presta¬ 
ciones  similares.  Utiliza  el  port  del  usuario. 

PROLOGIC  L.C.:  19.900  Ptas. 

RAM  DISK  l  i  a aa  ptas. 

64 K  exp.  256K  N.7ÜU 

CABLE  PROLONGADOR  ,  ptas 

PORT  USUARIO  4.25U 

CABLE  PROLONGADOR  a  «ja  ptaq 

PORT  EXTENSION  4.  / M) 


TARJETAS  DE  EPROMS 

[JO  Ya  le  damos  todo  preparado  para  fabri¬ 
car  sus  propios  cartuchos.  Sólo  tiene  que 
enchufar  la(s)  Eprom(s)  en  su(s)  respecti- 
vo(s)  zócalo(s). 

LJ O  Permite  instalar  2X2764  ó  2X27 1 6  ó  2X27 1 28. 

1.700  Ptas. 


Permite  instalar  2X2764  ó  2X27128. 

2.900  Ptas. 


BORRADOR  DE  EPROMS 

Borra  Los  eproms  en  3/5  minutos.  9.500  Ptas. 


flDTOCTISA 


C/  Coso.  87  -  69  A  -  Telf.  (976)  39  99  61  -  50001  ZARAGOZA 


BOLETIN  DE  PEDIDO 


Deseo  me  envíen: 
.  artículos  N. 


artículos  N .  a  . 

artículos  N .  a  . 

artículos  N .  a  . 


Nombre  . 

Dirección  . 

Población/  provincia 


□  Contra  reembolso  □  Talón  adjunto 


Al  principio  de  la  transmisión  se 
envían  cuatro  bytes:  dos  para  la  direc¬ 
ción  inicial  y  otros  dos  para  la  dirección 
final.  A  continuación  se  envían  uno  por 
uno  todos  los  bytes  del  programa  o 
zona  de  memoria  a  transferir.  El  recep¬ 
tor  por  su  parte  hace  lo  mismo:  recibe 
las  direcciones  inicial  y  final  y  comienza 
a  colocar  los  datos  a  partir  de  ahí.  Si  por 
alguna  razón  recibe  un  byte  de  más,  o 
cambiado,  al  principio  de  la  transmi¬ 
sión,  en  las  direcciones,  puede  quedarse 
equivocado  en  la  dirección  inicial,  que¬ 
darse  colgado  o  recibir  menos  bytes  de 
los  debidos.  En  cualquier  caso  conviene 
hacer  STOP/ RESTORE  antes  de  co¬ 
menzar.  Puedes  utilizar  la  rutina 
desde  código  máquina,  colocando  las 
direcciones  inicial  y  final  en  $FB/$FC  y 
$FD/  FE  y  saltando  a  SCOFO  para  emi¬ 
tir.  Para  recibir  programas  hay  que  lla¬ 
mar  a  $C003  y  para  recibir  un  dato  lla¬ 
mar  a  SC006,  el  dato  se  entregará  en  el 
acumulador. 

Después  de  recibir  un  programa  Basic 
hay  que  ajustar  los  punteros  de  princi¬ 
pio/fin  de  programa,  con  la  siguiente 
línea: 

POKE  45,PEEK(253):POKE46,PEEK 
(254):CLR 

De  lo  contrario  aparecerá  un  error 
OUT  OF  MEMORY?  al  intentar  hacer 
RUN,  y  el  programa  será  parcialmente 
borrado. 

La  rutina  no  tiene  ningún  tipo  de 
suma  de  control,  pero  es  fiable,  siempre 
que  la  longitud  del  cable  que  conecta  los 
ordenadores  no  sea  exagerada  y  las 
conexiones  estén  bien  hechas  (sin  sol¬ 
daduras  chapuceras  y  cosas  por  el 
estilo).  Esta  es  una  muestra  de  los  tiem¬ 
pos  empleados  en  la  emisión/ recepción 
de  datos: 


Longitud 


Tiempo 


1  Kbyte  0,15  segundos 

16  Kbytes  2,2  segundos 

48  Kbytes  6,2  segundos 

1  Kbyte  15  segundos 

(ASCII-Basic) 


¿Es  o  no  es  rápida?  Recibiendo  fiche¬ 
ros  de  datos  mediante  el  programilla 
Basic  antes  descrito  se  ralentiza  bas¬ 


tante,  pero  es  el  precio  que  hay  que 
pagar  por  poder  filtrar  la  información. 
Realizar  un  programa  en  cm  con  el  fil¬ 
tro  no  sería  demasiado  complicado, 
pero  sólo  serviría  para  un  formato  de 
ficheros  y  sería  poco  útil. 

Aplicaciones. 

Para  qué  demonios  sirve  todo  esto 

Este  montaje  tiene  muchas  aplicacio¬ 
nes,  aunque  cada  uno  debe  buscarle  sus 
propios  usos.  Entre  las  que  se  me  han 
ocurrido  están  las  siguientes: 

—  Para  tranferir  ficheros  de  datos 
(texto  generalmente)  de  otros  ordena¬ 
dores  (C-16,  por  ejemplo),  siempre  que 
tengan  salida  Centronics  a  impresora. 
En  este  caso  se  tiene  que  utilizar  el 
receptor-centronics  y  unos  filtros  Basic. 

—  Para  utilizar  dos  ordenadores 
(C-64)  en  programación.  En  un  ordena¬ 
dor  se  teclean  el  listado  fuente  y  en  el 
otro  se  prueban  los  programas.  Así  se 
evitan  los  “cuelges”  cada  vez  que  el  pro¬ 
grama  no  funciona,  con  la  consiguiente 
pérdida  de  tiempo  en  cargar  de  nuevo  el 
ensamblador  y  todo  eso.  Naturalmente 
puede  editarse  en  otro  ordenador  no- 
Commodore  aprovechando  otros  tipos 
de  ayudas  (rapidez,  buenos  ensambla¬ 
dores).  Así  es  cómo  lo  hacen  los  pro¬ 
gramadores  profesionales. 

—  El  C-64  como  Buffer  de  Impre¬ 
sora.  Si  al  C-64  que  hace  de  receptor  se 
le  coloca  una  impresora  y  consigues  que 
todo  lo  que  reciba  lo  almacene  y  des¬ 
pués  lo  imprima...  tienes  un  buffer  de 
64K  simulado  para  tu  impresora. 

—  El  C-64  como  Disco-RAM.  Esto 
es  muy  parecido  a  lo  del  buffer  de 
impresora.  En  64K  puedes  almacenar 
varios  programas  pequeños,  y  un  pro¬ 
grama  controlador,  para  que  desde  el 
C-64  receptor  cargues  mediante  algún 
comando  especial  los  programas  memo- 
rizados  en  el  otro  C-64.  También  se 
podría  utilizar  para  “grabar”  programas 
en  la  memoria  del  otro  C-64. 

Juegos.  Se  pueden  utilizar  dos 
C-64  para  hacer  juegos  tipo  “batalla 
naval”  o  incluso  cosas  más  complicadas. 
En  este  caso  hay  que  tener  cuidado  con 
que  los  dos  emitan  a  la  vez. 


En  cualquier  caso,  se  trata  de  ahorrar 
tiempo.  Sería  muy  bueno  que  pudierais 
grabar  la  rutina  en  una  pequeña 
EPROM  para  que  estuviera  siempre  en 
memoria,  y  no  hubiera  que  cargarla 
cada  vez  que  quisieras  emitir-recibir. 

¿Sólo  C-64? 

Cómo  adaptar  el  programa 
a  otros  Commodore 


Estoy  seguro  de  que  los  usuarios  de 
Vic-20,  si  todavía  queda  alguno,  o  los  de 
C-128,  que  crecen  dia  a  día,  estarán  bas¬ 
tante  “mosqueados”  porque  en  todo  el 
artículo  sólo  se  ha  hecho  mención  al  C- 
64.  Por  experiencia  propia  sé  que  los 
Vic-ciosos  son  los  que  más  se  dedican  al 
cacharreo  de  hardware  con  el  ordenador 
y  que  a  un  buen  número  de  los  128ria- 
nos  les  gustaría  poder  utilizar  este  mon¬ 
taje  no  sólo  en  “Modo-64”.  Los  del  C-16 
sólo  tienen  la  posibilidad  de  trabajar 
como  “emisores”,  mediante  un  interface 
Centronics  por  hardware,  porque  el 
C-16  no  tiene  port  del  usuario. 

Por  falta  de  tiempo  no  hemos  podido 
preparar  la  versión  Vic-20  ni  la  de  C-128. 
En  el  caso  del  Vic-20  el  sistema  de 
entrada/ salida  por  el  port  varía  un 
poco.  En  cuanto  podamos  publicare¬ 
mos  sendas  conversiones.  En  principio 
estaba  pensado  para  que  la  simulación 
de  un  “C-64/  impresora”  funcionara  con 
cualquier  ordenador,  de  modo  que 
desde  un  PC,  por  ejemplo,  se  pudieran 
enviar  ficheros  de  datos  al  C-64,  pero 
resulta  que  la  conexión  a  un  PC  es  bas¬ 
tante  más  complicada  que  el  montaje 
que  se  utiliza  en  este  artículo.  Si  algún 
lector  tiene  alguna  idea  nueva  o  mejoras 
sobre  el  programa,  una  protección  con¬ 
tra  el  “choque”  emisor-emisor,  por 
ejemplo,  será  bien  recibida.  También 
nos  interesaría  recibir  noticias  de  los 
usos  que  le  deis  a  este  montaje.  ■ 


COMMODORE  WORLD  NO  SE 
HACE  RESPONSABLE  DE  LOS 
DESPERFECTOS  CAUSADOS 
POR  ERRORES  EN  EL  MON¬ 
TAJE  O  UTILIZACION  DE  ESTE 
PROGRAMA. 


23 

DATA 

0,141,3,221,169,4,141 

.  127 

39 

DATA 

72,169,0,141,0,221,104 

.  197 

24 

DATA 

2,221,32,111,192,133,251 

-  198 

40 

DATA 

24,96,72,41,240,24,106 

.  138 

25 

DATA 

32,111,192,133,252,32,111 

-97 

41 

DATA 

106,106,106,170,189,100,193 

.89 

26 

DATA 

192,133,253,32,111, 192,133 

.226 

42 

DATA 

32,210,255,104,72,41 , 15 

.24 

27 

DATA 

254,169,127,160,193,32,30 

.  17 

43 

DATA 

170, 189,100,193,32,210,255 

.  121 

28 

DATA 

171 , 164,251 , 165,252,32, 170 

.30 

44 

DATA 

104,96,72,169,36,32,210 

.2 

29 

DATA 

192,169,45,32,210,255,32 

.  13 

45 

DATA 

255,104,72,32, 142,192, 152 

.49 

30 

DATA 

111 , 192,176,29,160,0,145 

.238 

46 

DATA 

32,142,192,104,96,32,253 

.96 

31 

DATA 

25 1 , 230 ,251, 208 , 2 , 230 , 252 

.  153 

47 

DATA 

174,32,158,173,32,247,183 

.245 

32 

DATA 

165,252,197,254,208,235,165 

.80 

48 

DATA 

96,169,4,141,2,221,32 

.  126 

33 

DATA 

251,197,253, 208 ,229,32,111 

.  105 

49 

DATA 

121,0,208,19,165,43,164 

.85 

34 

DATA 

192,160,0, 145,251,164,251 

.252 

50 

DATA 

44,133,251 , 132,252,165,45 

.38 

35 

DATA 

165,252,32,170, 192,96,173 

.  143 

51 

DATA 

164,46,133, 253 ,132, 254 , 76 

.  123 

36 

DATA 

13,221,41,16,208,7,32 

.64 

52 

DATA 

240,192,32,187,192,132,251 

.  122 

37 

DATA 

225,255,208,244,56,96,  169 

.67 

53 

DATA 

1 33 , 252 ,32,187,192,132, 253 

.97 

38 

DATA 

4,141,0,221,173,1,221 

.36 

54 

DATA 

133,254,169,116,160,193,32 

.  138 
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55  DATA  30,171,164,251,165,252,32  .41 

56  DATA  170,192,169,45,32,210,255  .222 

57  DATA  165,251,32,65,193,165,252  .199 

58  DATA  32,65,193,165,253,32,65  .56 

59  DATA  193,165,254,32,65,193,160  .151 

60  DATA  0,177,251,32,65,193,208  .112 

61  DATA  25,230,251,208,2,230,252  .223 

62  DATA  165,252,197,254,208,235,165  .110 

63  DATA  251,197,253,208,229,160,0  .97 

64  DATA  177,251,32,65,193,164,251  .150 

65  DATA  165.252,32,170,192,96,162  .161 


66  DATA  255,142,3,221,141,1,221  .24 

67  DATA  169,0,141,0,221,169,4  .225 

68  DATA  141,0,221,173,13,221,41  .186 

69  DATA  16,201,16,240,7,32,225  .3 

70  DATA  255,208,242,169,1,96,48  .42 

71  DATA  49,50,51,52,53,54,55  .43 

72  DATA  56,57,65,66,67,68,69  .244 

73  DATA  70,69,78,86,73,65,78  .87 

74  DATA  68,79,58,32,0,82,69  .70 

75  DATA  67,73,66,73,69,78,68  .7 

76  DATA  79,58,32,0  .88 


PAL 

n 

(C) 1979 

BRAD  TEMPLETON 

110: 

C000 

.OPT 

00,  P 

130: 

C000 

5 

PORTA 

= 

*DD00 

140: 

C000 

PORTB 

= 

*DD01 

150: 

C000 

DDRA 

= 

$DD02 

160: 

C000 

DDRB 

=X 

SDD03 

170: 

C000 

FLAG2 

ss 

$DD0D 

180: 

C000 

CHROUT 

= 

$FFD2 

190: 

C000 

STOP 

= 

$FFE1 

200: 

C000 

BUSCOM 

= 

$AEFD 

210: 

C000 

EVAARG 

s 

$AD9E 

220: 

C000 

FLOATBYT 

= 

$B7F7 

230: 

C000 

FROM 

= 

$FB 

240: 

C000 

TO 

B 

SFD 

250: 

C000 

STROUT 

= 

$AB1E 

260: 

C000 

CHRGOT 

= 

$0079 

280: 

C000 

4C 

C5 

C0 

1 

JMP 

SEND 

290: 

C003 

4C 

14 

C0 

JMP 

RECE I VE 

300: 

C006 

A9 

00 

READBYTS 

LDA 

#0 

300: 

C008 

8D 

03 

DD 

STA 

DDRB 

300: 

C00B 

A9 

04 

LDA 

#4 

300: 

C00D 

8D 

02 

DD 

STA 

DDRA 

310: 

C010 

20 

6F 

C0 

JSR 

GETBYTE 

310: 

C013 

60 

RTS 

330: 

C014 

A9 

00 

RECE I VE 

LDA 

#0 

330: 

C016 

8D 

03 

DD 

STA 

DDRB 

340: 

C019 

340: 

C019 

A9 

04 

LDA 

#4 

340: 

C01B 

8D 

02 

DD 

STA 

DDRA 

360: 

C01E 

20 

6F 

C0 

; 

JSR 

GETBYTE 

360: 

C021 

85 

FB 

STA 

FROM 

370: 

C023 

20 

6F 

C0 

JSR 

GETBYTE 

370: 

C026 

85 

FC 

STA 

FROM+1 

380: 

C028 

20 

6F 

C0 

JSR 

GETBYTE 

380: 

C02B 

85 

FD 

STA 

TO 

390: 

C02D 

20 

6F 

C0 

JSR 

GETBYTE 

390: 

C030 

85 

FE 

STA 

T0+ 1 

410: 

C032 

A9 

7F 

! 

LDA 

4KMSG2 

410: 

C034 

A0 

C1 

LDY 

#  >MSG2 

410: 

C036 

20 

1E 

AB 

JSR 

STROUT 

420: 

C039 

A4 

FB 

LDY 

FROM 

420: 

C03B 

A5 

FC 

LDA 

FROM+1 

420: 

C03D 

20 

AA 

C0 

JSR 

DOSBYTES 

430: 

C040 

A9 

2D 

LDA 

430: 

C042 

20 

D2 

FF 

¡ 

MORE1 

JSR 

CHROUT 

450: 

C045 

20 

6F 

C0 

JSR 

GETBYTE 

450: 

C048 

B0 

ID 

BCS 

BRK1 

460: 

C04A 

A0 

00 

LDY 

#0 

460: 

C04C 

91 

FB 

STA 

(FROM) , Y 

470: 

C04E 

E6 

FB 

INC 

FROM 

470: 

C050 

D0 

02 

BNE 

OKI 

480: 

C052 

E6 

FC 

INC 

FROM+1 

490: 

C054 

A5 

FC 

OKI 

LDA 

FROM+1 

490: 

C056 

C5 

FE 

CMP 

TQ+1 

490: 

C058 

D0 

EB 

BNE 

M0RE1 

500: 

C05A 

A5 

FB 

LDA 

FROM 

500: 

C05C 

C5 

FD 

CMP 

TO 

LISTADO  2 


;  EMITIR  DATOS 
;  RECIBIR  DATOS 

;  LEER  BVTES  SUELTOS 

;  PORT  B  COMO  ENTRADA 

5  PORT  A  (BIT  2)  COMO  SALIDA 

\  LEE  LOS  4  PUNTEROS 
;  "FROM"  Y  MTO" 

;  EMITE  MENSAJE  "RECIBIENDO" 

;  JUNTO  CON  LA  DIRECCION  INICIAL 
;  Y  UN 

;  LEE  UN  BYTE  Y  CONSULTA  STOP 
¡  COLOCA  EL  BYTE  EN  MEMORIA 
;  INCREMENTA  PUNTERO 


5001 

C05E 

D0 

E5 

BNE 

MORE1 

i 

COMPRUEBA  ULTIMO  BYYE 

5101 

C060 

20 

6F 

C0 

JSR 

GETBYTE 

5101 

C063 

A0 

00 

LDY 

#0 

510t 

C065 

91 

FB 

STA 

<FROM) , Y 

; 

RECIBIR  EL  ULTIMO  BYTE 

5201 

C067 

A4 

FB 

BRK1 

LDY 

FROM 

5201 

C069 

A5 

FC 

LDA 

FROM+1 

5201 

C06B 

20 

AA 

C0 

JSR 

DOSBYTES 

EMITIR  DIRECCION  FINAL 

530 1 

C06E 

60 

i 

GETBYTE 

RTS 

» 

FIN 

5601 

C06F 

AD 

0D 

DD 

LDA 

FLAG2 

; 

COMPRUEBA  STROBE 

570i 

C072 

29 

10 

AND 

#«10 

5801 

C074 

DO 

07 

BNE 

DATAREAD 

; 

DATO  LISTO 

5901 

C076 

20 

El 

FF 

JSR 

STOP 

COMPRUEBA  STOP 

600s 

C079 

D0 

F4 

BNE 

GETBYTE 

NO  HAY  STOP 

6101 

C07B 

38 

END 

SEC 

610: 

C07C 

60 

RTS 

i 

STOP  -  ACTIVA  CARRY 

6201 

C07D 

A9 

04 

DATAREAD 

LDA 

#4 

6201 

C07F 

8D 

00 

DD 

STA 

PORTA 

i 

CONECTA  BUSY 

630* 

C082 

AD 

01 

DD 

LDA 

PORTB 

630* 

C085 

48 

PHA 

; 

LEE  DATO  Y  LO  GUARDA  EN  STACK 

640* 

C086 

A9 

00 

LDA 

#0 

640* 

C088 

8D 

00 

DD 

STA 

PORTA 

i 

DESCONECTA  BUSY 

650* 

C08B 

68 

PLA 

650: 

C08C 

18 

CLC 

650: 

C08D 

60 

RTS 

i 

RECUPERA  DATO  Y  FIN 

660: 

C08E 

660* 

C08E 

670* 

C08E 

48 

CONVERT 

PHA 

; 

CONVERSOR  DEC IMAL/HEXADEC I AMAL 

680* 

C08F 

29 

F0 

AND 

#7.11110000 

680* 

C09 1 

18 

CLC 

680: 

C092 

6A 

ROR 

680* 

C093 

6A 

ROR 

680* 

C094 

6A 

ROR 

680: 

C095 

6A 

ROR 

690* 

C096 

AA 

TAX 

690* 

C097 

BD 

64 

C1 

LDA 

HEXADEC , X 

690* 

C09A 

20 

D2 

FF 

JSR 

CHROUT 

700* 

C09D 

68 

PLA 

700: 

C09E 

48 

PHA 

700: 

C09F 

29 

0F 

AND 

#7.00001111 

710: 

C0A1 

AA 

TAX 

710* 

C0A2 

BD 

64 

C1 

LDA 

HEXADEC ,X 

710* 

C0A5 

20 

D2 

FF 

JSR 

CHROUT 

720* 

C0A8 

68 

PLA 

720* 

C0A9 

60 

RTS 

730: 

C0AA 

730* 

C0AA 

1 

DOSBYTES 

750: 

C0AA 

48 

PHA 

750* 

C0AB 

A9 

24 

LDA 

#"*M 

750* 

C0AD 

20 

D2 

FF 

JSR 

CHROUT 

i 

IMPRIME  «XXXX  -VALOR  EN  Y/A 

760* 

COBO 

68 

PLA 

760: 

C0B1 

48 

PHA 

760* 

C0B2 

20 

8E 

C0 

JSR 

CONVERT 

770: 

C0B5 

98 

TYA 

770: 

C0B6 

20 

8E 

C0 

JSR 

CONVERT 

770: 

C0B9 

68 

PLA 

770: 

COBA 

60 

í 

GETVAL 

RTS 

790: 

C0BB 

20 

FD 

AE 

JSR 

BUSCON 

790: 

C0BE 

20 

9E 

AD 

JSR 

EVAARG 

790: 

COCI 

20 

F7 

B7 

JSR 

FLOATBYT 

790: 

C0C4 

60 

S 

SEND 

RTS 

i 

LEE  DATO  DE  LA  SENTENCIA  BASIC 

810: 

C0C5 

A9 

04 

LDA 

#4 

810: 

C0C7 

8D 

02 

DD 

STA 

DDRA 

i 

STROBE  ALTO  PARA  ENVIAR  DATOS 

820: 

COCA 

20 

79 

00 

JSR 

CHRGOT 

820: 

C0CD 

DO 

13 

BNE 

READVAL 

p 

COMPRUEBA  VALORES  POR  DEFECTO 

830: 

C0CF 

A5 

2B 

LDA 

43 

830: 

C0D1 

A4 

2C 

LDY 

44 

830: 

C0D3 

85 

FB 

STA 

FROM 

830: 

C0D5 

84 

FC 

STY 

FROM+1 

; 

AJUSTA  VALORES  POR  DEFECTO, 

840: 

C0D7 

A5 

2D 

LDA 

45 

840: 

C0D9 

A4 

2E 

LDY 

46 

840: 

C0DB 

85 

FD 

STA 

TO 

840: 

C0DD 

84 

FE 

STY 

TO+1 

840: 

C0DF 

4C 

F0 

C0 

JMP 

VALUESOK 

i 

LOS  PUNTEROS  43/44  Y  45/46 

850: 

C0E2 

20 

BB 

C0 

READVAL 

JSR 

GETVAL 

? 

LEE  VALOR 1  (FROM) 

860: 

C0E5 

84 

FB 

STY 

FROM 

860: 

C0E7 

85 

FC 

STA 

FROM+1 

BU 
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870: 

C0E9 

20 

BB 

C0 

JSR 

GETVAL 

; 

LEE  VAL0R2  (TO) 

880: 

C0EC 

84 

FD 

STY 

TO 

880« 

C0EE 

85 

FE 

STA 

TQ+ 1 

900: 

C0F0 

A9 

74 

VALUESOK 

LDA 

#<MSG 

9003 

C0F2 

A0 

C1 

LDY 

#>MSG 

900« 

C0F4 

20 

1E 

AB 

JSR 

STROUT 

EMITE  "EMITIENDO", 

910: 

C0F7 

A4 

FB 

LDY 

FROM 

910* 

C0F9 

A5 

FC 

LDA 

FROM+1 

9103 

C0FB 

20 

AA 

C0 

JSR 

DOSBYTES 

1 

LA  DIRECCION  INICIAL 

920* 

C0FE 

A9 

2D 

LDA 

#"-" 

9203 

C100 

20 

D2 

FF 

JSR 

CHROUT 

t 

Y 

9403 

C 103 

A5 

FB 

5 

LDA 

FROM 

940: 

C105 

20 

41 

C1 

JSR 

SENDBYTE 

; 

ENVIA  LOS  CUATRO  PUNTEROS 

9503 

C 1 08 

A5 

FC 

LDA 

FROM+1 

950: 

C10A 

20 

41 

C1 

JSR 

SENDBYTE 

960: 

C10D 

A5 

FD 

LDA 

TO 

960: 

C10F 

20 

41 

C1 

JSR 

SENDBYTE 

970: 

C  1  1  2 

A5 

FE 

LDA 

TO+ 1 

970: 

C114 

20 

41 

C1 

JSR 

SENDBYTE 

990: 

C117 

A0 

00 

i 

MQRE2 

LDY 

#0 

5 

EMITIR  CADENA  DE  BYTES 

1000  3 

C 1 1 9 

B  1 

FB 

LDA 

(FROM)  ,  Y 

; 

LEE  UN  BYTE  DE  LA  MEMORIA 

10103 

CUB 

20 

41 

C1 

JSR 

SENDBYTE 

1010: 

CHE 

D0 

19 

BNE 

BRK2 

; 

LO  ENVIA  Y  COMPRUEBA  STOP 

1020: 

C 1 20 

E6 

FB 

INC 

FROM 

1020  3 

C 1 22 

D0 

02 

BNE 

0K2 

; 

INCREMENTA  PUNTERO 

1030: 

C 1 24 

E6 

FC 

INC 

FROM+l 

10403 

C 1 26 

A5 

FC 

0K2 

LDA 

FROM+1 

1040: 

C 1 28 

C5 

FE 

CMP 

TO+1 

1040: 

C12A 

D0 

EB 

BNE 

MORE2 

1050: 

C12C 

A5 

FB 

LDA 

FROM 

1050  3 

C12E 

C5 

FD 

CMP 

TO 

1050  8 

C130 

D0 

E5 

BNE 

M0RE2 

; 

COMPRUEBA  ULTIMO  BYTE 

10603 

C132 

A0 

00 

LDY 

#0 

1060: 

C134 

B 1 

FB 

LDA 

(FROM) , Y 

1060: 

C 1 36 

20 

41 

C1 

JSR 

SENDBYTE 

; 

ENVIA  EL  ULTIMO  BYTE 

10703 

C139 

A4 

FB 

BRK2 

LDY 

FROM 

10708 

C13B 

A5 

FC 

LDA 

FROM+ 1 

1070: 

C13D 

20 

AA 

C0 

JSR 

DOSBYTES 

i 

EMITE  LA  DIRECCION  FINAL 

1080: 

C140 

60 

RTS 

5 

FIN 

1100: 

C141 

A2 

FF 

i 

SENDBYTE 

LDX 

#*FF 

11008 

C143 

0E 

03 

DD 

STX 

DDRB 

i 

PORT  B  COMO  SALIDA 

11101 

C146 

8D 

01 

DD 

STA 

PORTB 

i 

COLOCA  EL  DATO 

11203 

C 1 49 

A9 

00 

LDA 

#0 

11208 

C14B 

8D 

00 

DD 

STA 

PORTA 

11201 

C14E 

A9 

04 

LDA 

#4 

1120: 

C150 

8D 

00 

DD 

STA 

PORTA 

i 

BAJA  Y  SUBE  STROBE 

11308 

C153 

AD 

0D 

DD 

WAITBUSY 

LDA 

FLAG2 

$ 

CARGA  VALOR  DEL  BUSY 

11408 

C156 

29 

10 

AND 

#16 

11403 

C 1 58 

C9 

10 

CMP 

#16 

11403 

C15A 

F0 

07 

BEQ 

FINSEND 

i 

COMPRUEBA  RECEPCION 

11508 

C15C 

20 

El 

FF 

JSR 

STOP 

11501 

C15F 

D0 

F2 

BNE 

WAITBUSY 

» 

COMPRUEBA  STOP  -  LISTO? 

11603 

C161 

A9 

01 

LDA 

#1 

; 

INDICADOR  DE  STOP 

11708 

C163 

60 

FINSEND 

RTS 

i 

FIN  DE  EMISION 

11803 

C164 

30 

31 

32 

HEXADEC 

.  ASC 

"01 23456789 ABCDEF"  :  CADENA  CONVERSION 

11908 

C174 

45 

4E 

56 

MSG 

.  ASC 

"ENVIANDO:  " 

1190: 

C17E 

00 

-BYT 

0 

1200: 

C17F 

52 

45 

43 

MSG2 

.ASC 

"RECIBIENDO: 

i 

12003 

C18B 

00 

.BYT 

0 

IC000- 

-C18C 

100  REM  FILTRO  BASIC  PARA  ASCII 


110  3 

120  SYS49158  * REh 
130  A~PEEK(780)  «REM 
140  I FA< 32ANDA<  > 1 3THEN 1 20  «REM 
150  IFA>96THENA=*A-32«  GOTO  170  «REM 
160  IFA>64ANDA<97THENA~A+32  «REM 
170  PRINTCHR* (A) ;  «REM 
180  GOTO 120 


LISTADO  3 


LEE  UN  BYTE  DEL  CANAL  CENTRONICS 
PONE  EN  "A"  EL  BYTE  LEIDO 

CODIGOS  DE  CONTROL  NO  (0-31)  EXCEPTO  RETURN 
MINUSCULAS  ASCII  A  MINUSCULAS  COMMODORE 
MAYUSCULAS  ASCII  A  MAYUSCULAS  COMMODORE 
IMPRIME  CARACTER  EN  PANTALLA 
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Este  artículo  explica  cómo  conseguir  gráficos  tridimensionales 
de  forma  rapidísima  en  el  C-64.  Con  el  programa  “Turbografik” 
podrás  conseguir  automáticamente  películas  de  animación  gráfica 
en  3D. 

Por  Martin  Leibbrandt _  _  C-64,  unidad  de  disco 


Muchos  programadores  de  lenguaje  BASIC 
sueñan  con  crear  animación  con  gráficos 
3D  en  su  Commodore  64.  TURBOGRA- 
FIK  proporciona  una  buena  base.  El 
paquete  consta  de  cuatro  listados.  Sobre 
el  disco  deben  encontrarse  los  ficheros 
TURBOGRAFIK. OBJ  y  CLIP. OBJ,  que  son  generados  por 
los  listados  1  y  2.  El  otro  programa,  VIDEOTAPE,  sirve  para 
ver  las  “películas"  grabadas  con  el  TURBOGRAFIK.  Tras 
haber  tecleado  y  grabado  en  disco  todos  los  listados,  debes 
ejecutar  el  programa  TURBOGRAFIK  con  RUN.  Poco  des¬ 
pués  aparecerá  el  menú  principal. 

Los  fundamentos  del  programa  son  los  siguientes:  Primero, 
defines  un  objeto,  indicando  sus  puntos  y  la  conexión  entre 
ellos.  Acto  seguido  llevas  ese  objeto  a  dos  posiciones  en  el 
espacio.  El  ordenador  se  encarga  de  realizar  una  secuencia  de 
animación,  según  el  número  de  imágenes  o  “fotogramas"  que 
tú  elijas.  Esto  influye  en  la  velocidad  y  la  definición.  Con  un 
poco  de  imaginación  puedes  encadenar  varias  secuencias  para 
formar  una  película.  Se  utilizan  dos  pantallas  de  alta  resolu¬ 
ción  o  bit-map  para  que  no  se  note  el  paso  de  imagen  a 
imagen.  Mientras  estás  viendo  una,  el  ordenador  está  calcu¬ 
lando  la  siguiente  en  otra  pantalla.  Veamos  ahora  las  opcio¬ 
nes  del  menú. 


1.  Posicionar  objeto 


En  este  punto  del  menú  es  donde  se  lleva  el  objeto  a  la 
pantalla.  Elige  I  para  comenzar  o  2  para  continuar  en  el  lugar 
donde  se  encontraba  el  objeto  por  última  vez.  En  la  pantalla 
aparecerá  el  gráfico  en  alta  resolución.  Para  continuar  donde 
nos  habíamos  quedado  se  debe  apretar  el  botón  de  fuego  del 
joystick.  Poco  tiempo  después  aparece  la  figura  en  la  pantalla 
de  alta  resolución. 

El  objeto  se  puede  mover  mediante  el  joystick  en  el  port  2, 
de  la  siguiente  forma: 

Arriba  -  mover  10  grados  en  sentido  anti-horario. 

Abajo  -  mover  10  grados  en  sentido  horario. 

Derecha  -  desplazar  5  unidades  hacia  la  derecha. 

Izquierda  -  desplazar  5  unidades  a  la  izquierda. 

Botón  -  duplicar  estos  valores. 

Como  no  se  puede  girar  el  objeto  en  todos  los  ejes  al  mismo 
tiempo,  se  eligen  los  ejes  X,  Y  o  Z  con  las  teclas  I,  2  y  3.  El  I 
significa  girar  sobre  el  eje  X  y  el  2  para  girar  sobre  el  eje  Y.  El 
3  actúa  sobre  el  eje  Z.  No  ocurre  nada  si  por  su  posición  el 
objeto  desaparece  de  la  pantalla  por  la  izquierda,  por  la  dere¬ 
cha,  por  arriba  o  por  abajo.  Con  esto  puedes  crear  bonitos 
efectos  de  ampliación.  Los  puntos  que  forman  el  objeto  son 
calculados  siempre,  para  que  pueda  ser  trasladado  de  nuevo 
sin  errores.  Cuando  hayas  colocado  correctamente  el  objeto 
en  el  lugar  deseado  (ten  en  cuenta  que  luego  sólo  se  van  a 


considerar  la  posición  inicial  y  final,  no  las  intermedias),  pulsa 
la  barra  espaciadora  para  volver  al  menú  principal. 

2.  Crear  película 


En  este  subprograma  se  editan  las  secuencias  de  imágenes 
(fotogramas)  que  combinadas  formarán  la  animación,  por  lo 
que  se  necesita  un  poco  de  tiempo,  aunque  generalmente  no 
pasa  de  30-60  segundos.  El  ordenador  calcula  siempre  las 
imágenes  teniendo  en  cuenta  la  posición  en  que  se  encontraba 
el  objeto  y  la  posición  actual.  Puedes  variar  el  “número  de 
dibujos",  que  indica  en  cuántas  imágenes  o  fotogramas  va  a 
dividirse  el  movimiento.  Un  número  elevado  da  lugar  a  un 
movimiento  fluido,  pero  supone  más  consumo  de  memoria. 
Un  número  bajo  resta  definición  a  la  animación. 

Por  ejemplo,  para  hacer  rotar  un  objeto  alrededor  de  su 
propio  eje,  primero  lo  colocas  en  su  posición  inicial,  seleccio¬ 
nas  el  eje  con  las  teclas  1,  2  y  3  y  mueves  arriba  y  abajo 
joystick  para  hacer  el  giro.  Si  quieres  que  el  movimiento 
parezca  continuado,  tendrás  que  mostrar  muchas  imágenes. 
Si  lo  que  quieres  es  velocidad,  tendrás  que  utilizar  un  número 
bajo.  En  el  primer  caso  debes  indicar  36  o  más,  y  en  el 
segundo  caso  18  o  menos.  Estos  valores  varían  con  el  tamaño 
del  objeto  (ampliación).  Cuanto  más  grande  sea,  más  se  tar¬ 
dará  en  dibujar  las  líneas.  La  película  definitiva  está  formada 
con  varias  “secuencias".  Esto  se  consigue  volviendo  a  utilizar 
la  opción  1,  seleccionando  “2"  (continuar)  y  colocando  el 
objeto  en  la  nueva  posición.  En  caso  de  que  desees  calcular 
más  de  255  dibujos  en  total  o  que  la  capacidad  de  memoria  no 
sea  suficiente,  el  programa  te  repetirá  la  pregunta  “número  de 
dibujos?".  Cuando  la  secuencia  está  calculada,  lo  cual  no  suele 
durar  más  de  un  minuto,  el  programa  salta  al  menú  principal. 
Entonces  puedes  ver  el  resultado  utilizando  la  opción  3  del 
menú  principal. 

3.  Visualizar  película 


Esta  opción  del  menú  sirve  para  ver  la  secuencia  o  secuen¬ 
cias  que  ha  generado  el  ordenador.  Para  comenzar  la  proyec¬ 
ción  se  debe  pulsar  la  tecla  1.  Con  la  tecla  “flecha  a  la 
izquierda"  pueden  volver  al  menú  principal.  Cuando  la  pro¬ 
yección  de  la  secuencia  ha  acabado,  vuelves  al  menú  principal 
pulsando  cualquier  tecla. 

4.  Grabar  objeto 


Con  esta  opción  puedes  grabar  el  objeto  con  el  que  estés 
filmando  la  película.  Es  aconsejable  trasladar  el  objeto  a  la 
posición  inicial,  ya  que  no  se  graba  la  forma  del  objeto,  sino 
su  apariencia  momentánea.  Para  trasladar  el  objeto  a  su  posi- 
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SECUENCIA  DE  ANIMACION 


Para  esta  secuencia  de  animación  se  ha  utilizado  el  logotipo  de 
Commodore  World.  El  tamaño  de  las  teclas  pequeñas  es  original¬ 
mente  14X14  en  la  base  y  10X10  en  la  parte  superior.  Las  líneas 
DA  T A  del  logotipo  están  en  el  listado  “5”. 

/.  Esta  es  la  primera  imagen  que  aparece  en  la  pantalla.  La 
coordenada  0,0,  0  (que  está  en  el  centro  de  la  pantalla)  se  encuentra 
aquí  en  la  esquina  inferior  izquierda  de  la  primera  tecla. 

2.  ( ¡t iliza ndo  el  eje  Z  mediante  la  pulsación  de  la  tecla  “?”  hemos 
rotado  hacia  ahajo  el  logotipo  30  grados  (joystick  arriba/ abajo),  a 
la  vez  que  lo  hemos  ampliado  ( joystick  derecha). 

3.  Tras  rotar  un  poco  más  el  objeto  en  el  eje  Z,  lo  giramos 
parcialmente  sobre  el  eje  X  (teda  “/  "),  de  forma  que  quede  un 
poco  elevado. 

4.  Elevándolo  aún  más  sobre  el  eje  X  y  completando  la  rotación 
de  ISO  grados  del  eje  Z  podemos  observarlo  exactamente  desde  la 
parte  de  atrás. 

5.  Lo  hemos  elevado  hasta  la  vertical  (eje  X),  lo  hemos  aumen¬ 
tado  de  tamaño  aún  más  y  por  último  lo  hemos  girado  hacia  fuera 
sobre  el  eje  Y,  con  la  tecla  "2”  (joystick  arriba/ ahajo). 


ción  inicial  se  recurre  al  primer  punto  del  menú.  Se  utiliza  la 
opción  I  y,  sin  mover  el  joystick,  se  pulsa  la  barra  espada¬ 
dora.  Con  ello  el  objeto  volverá  a  su  estado  original.  Al  utili¬ 
zar  la  opción  4  (grabar  objeto)  el  programa  te  preguntará  por 
el  nombre  del  fichero  bajo  al  cual  será  grabado  en  el  disco.  Si 
introduces  el  carácter  “$"  podrás  ver  el  contenido  del  disco. 
T ras  pulsar  la  tecla  “espacio"  el  ordenador  te  vuelve  a  pregun¬ 
tar  por  el  nombre  del  fichero.  Cuando  el  objeto  esté  grabado, 
el  programa  volverá  al  menú  principal.  Para  cargar  un  objeto 
que  se  ha  grabado  previamente,  debes  utilizar  la  opción  5 


5.  Cargar  objeto 

Esta  opción  sirve  para  cargar  un  objeto  grabado  y  poderlo 
editar.  Si  quieres  colocar  el  objeto  en  su  posición  inicial, 
durante  el  desarrollo  de  la  edición,  debes  cargarlo  de  nuevo. 
Al  igual  que  en  el  punto  cuatro  del  menú,  con  “$"  se  visualiza 
el  contenido  del  disco  con  el  que  se  esté  trabajando.  Cuando 
termina  la  carga,  se  pasa  automáticamente  al  menú  principal. 
Las  opciones  4  y  5  sólo  sirven  para  grabar  objetos,  no  secuen¬ 
cias  de  animación.  Para  ello  debes  utilizar  la  opción  6 


6.  Grabar  película 

Debes  grabar  la  película  que  hayas  producido,  porque  al 
salir  del  programa  o  editar  otro  objeto  se  borra  automática¬ 
mente.  Para  proyectarla  se  utiliza  el  programa  VI  DEOTA  PE 
o  la  opción  3  del  menú.  Al  igual  que  en  las  otras  opciones, 
aquí  también  se  indica  el  nombre  con  el  cual  se  grabará  la 
película.  De  la  misma  forma  se  llega  al  menú  principal. 


7.  Fin  de  programa 

Apretando  la  tecla  1  desde  esta  opción,  se  finaliza  el  pro¬ 
grama.  En  caso  de  equivocación,  la  tecla  “flecha  a  la 
izquierda"  te  devolverá  al  menú  principal.  Esto  sirve  para 
todas  las  demás  opciones. 


Entrada  de  datos  de  los  objetos 

Los  datos  de  los  objetos  se  indican  como  las  coordenadas 
de  los  puntos  de  un  polígono.  El  primer  punto  se  une 
mediante  una  línea  recta  con  el  segundo,  este  con  el  tercero,  y 
así  sucesivamente.  Para  introducir  los  datos  debes  estar  en 
modo  directo.  Los  puntos  deben  ser  escritos  como  coordena- 


das  X,  Y,  Z  en  una  línea  DAT  A  a  partir  de  la  línea  20000.  Un 
ejemplo: 

20000  DATA  5,6,3 

Esta  línea  indica  que  el  primer  punto  está  situado  en  X  =  5, 
Y— 6,  Z=3.  Si  quisieras  definir  un  cuadrado,  tendrías  que 
indicar  lo  siguiente: 

20000  DATA  20,20,0 

20010  DATA  20,20,0 

20020  DATA  20,-20,0 

20030  DATA  20,-20,0 

20040  DATA  -20,20,0 

La  última  línea  es  necesaria  para  cerrar  el  cuadrado.  Siem¬ 
pre  necesitarás  una  línea  más  que  el  número  de  puntos  que 
tiene  el  polígono.  Cuando  el  polígono  está  cerrado,  se  indica 
con  un  “ — 1 000”.  Con  este  sistema  puedes  crear  dos  o  más 
objetos  simultáneos  en  la  pantalla,  sin  que  haya  líneas  que  los 
unan. 

20050  DATA  -1000 

Ahora  podrías  seguir  con  la  definición  de  un  rectángulo,  un 
cubo,  una  pirámide  o  cualquier  otra  cosa,  de  la  misma  manera 
que  has  definido  el  cuadrado.  Cuando  el  objeto  esté  comple¬ 
tamente  definido,  debes  colocar  otro  “1000”  como  último 
DATA.  Finalmente  debes  indicar  la  distancia  del  punto  de 
vista.  Es  decir,  el  lugar  en  que  se  encuentra  la  “cámara  ficti¬ 
cia”  o  el  plano  de  la  pantalla,  sobre  el  cual  se  va  a  proyectar  el 
objeto: 

20060  DATA  1000,50 

Con  ello  el  cuadrado  queda  definido  como  objeto  y  está 
listo  para  ser  editado. 


El  proyector  de  películas 


El  programa  VIDEOTAPE  sirve  para  visualizar  películas 
grabadas.  Después  de  cargar  y  ejecutar  este  programa,  tienes 
que  indicar  el  nombre  bajo  el  cual  has  grabado  la  película  en 
el  disco.  Acto  seguido  la  película  será  cargada  por  el  ordena¬ 
dor.  Pulsando  la  barra  espaciadora  se  proyectará  la  película 
en  la  pantalla.  Cuando  se  acaba  la  visualización  y  se  vuelve  a 
pulsar  la  barra  espaciadora  el  programa  pregunta  si  quieres 
ver  de  nuevo  la  película  que  está  en  la  memoria.  Debes  res¬ 
ponder  S  o  N  según  desees  repetir  o  volver  al  principio. 

Este  programa  sirve  de  ejemplo  para  ver  como  se  muestran 
las  películas  desde  un  programa  BASIC  propio.  Para  esto  es 
necesario  tener  en  cuenta  que  la  película  debe  estar  en  la 
memoria  a  partir  de  la  posición  $3000.  De  esta  forma  quedan 
aún  10239  Bytes  para  BASIC. 


Aspectos  internos  del  TURBOGRAFIK 


El  mapa  de  memoria  queda  de  la  siguiente  manera: 

$0100  $8C00  LIBRE 

$8C00  $9000  MEMORIA  DE  COLOR  1 

$9000  $ A000  PROGRAMA  EN  CODIGO  MAQUINA  I 

$ A000  $C000  BITMAP  1 

$C000  $ C440  PROGRAMA  EN  CODIGO  MAQUINA  2 

$C440  $CC00  LIBRE 

$CC00  $  E000  MEMORIA  DE  COLOR  2 

$E000  $FFFF  BITMAP  2 

Las  posiciones  de  cada  punto  del  objeto  están  almacenados 
de  la  siguiente  forma: 

Xd,  Yd,  Zd 
Número  de  los  planos 
API,  X0,  YO, Z0,  XI,  Y I , Z I 
AP2,  X0,  YO,  Z0,  XI,  Yl,  Zl, . 

AP3,... 

Xd,  Yd,  Zd  indican  la  rotación  de  base  del  objeto  desde  la 
posición  de  la  base.  El  valor  “número  de  los  planos”  indica  el 
número  de  polígonos  existentes.  El  valor  AP  indica  el  número 
de  puntos  en  los  polígonos  respectivos.  Para  girar  el  objeto, 
las  rutinas  necesitan  otros  datos: 

Xt  I ,  Yt  1  ,Zt  1 
Xd,  Yd,  Zd 
Xs,  Ys,  Zs 
Xt2,Yt2,Zt2 


Punto  de  vista,  plano  de  dibujo 

Todos  los  valores  están  compuestos  de  números  de  16  bits. 
El  índice  t  índica  la  traslación,  el  índice  d  el  giro,  y  el  índice  s 
la  escala  o  graduación.  Con  ello  son  posibles  ampliaciones 
simples  y  reflejos  en  los  ejes.  El  punto  de  vista  y  el  plano  de 
dibujo  tienen  el  mismo  significado  que  en  el  capítulo  de 
entrada  de  objetos.  Las  informaciones  de  dibujo  vienen  dadas 
de  la  forma  siguiente: 

Un  plano  (polígono):  X0,Y0,Z0,X1,Y1,Z1,... 

...,$8000,$8000 

Un  objeto:  AF,  plano  1,  plano  2,  plano  3,... 

AF  indica  nuevamente  la  cantidad  de  planos  del  objeto. 
Excepto  AF  y  AP,  que  se  indican  como  8  bits,  los  demás 
valores  siguen  teniendo  16  bits.  Una  película  se  compone  de 
un  conjunto  de  objetos. 

Veamos  la  descripción  de  las  rutinas  en  c.m.  más 
importantes: 

Rutinas  matemáticas: 
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Sobre  la  creación  de  objetos 

Las  líneas  tíñales  del  listado  3  contienen  un  objeto- 
ejemplo.  Fn  la  pantalla  aparecerá  la  palabra  “RlIN" 
cuando  arranques  la  opción  1  del  menú.  Está  formada  con 
líneas  rectas  que  se  encuentran  en  el  mismo  plano.  Fs 
sencillo  crear  un  juego  de  caracteres  completo  con  este 
sistema.  También  puedes  crear  letras  “planas"  haciendo 
que  no  sean  sólo  líneas,  sino  el  “borde"  de  una  letra,  for¬ 
mando  una  superficie.  También  puedes  volverlas  tridi¬ 
mensionales  superponiendo  dos  letras  “planas"  y  uniéndo¬ 
las  por  los  vértices. 

Los  objetos  que  crees  pueden  ser  tridimensionales,  y  un 
buen  ejemplo  de  ello  es  la  secuencia  de  animación  que 
hemos  creado  a  partir  del  logotipo  de  nuestra  revista.  Fl 
listado  5  contiene  los  datos  que  definen  este  “objeto"  que 
está  formado  por  cinco  teclas  pequeñas  y  una  larga.  Al 
tener  muchos  puntos,  el  programa  tarda  más  en  calcular 
cada  imagen  cuando  estás  posieionándolo.  También  se  tar¬ 
da  más  en  calcular  los  fotogramas  de  la  película,  y  se  pueden 
calcular  menos  de  lo  normal.  Es  importante,  pues,  encontrar 
equilibrio  entre  el  número  de  líneas,  imágenes  y  velocidad. 


Registros  aritméticos  AB  en  $61  $62 

CD  en  $63  $64 

Ambos  en  modo  byte  alto  byte  bajo,  el  alto  en  A  ($61)  y  el 
bajo  en  B  ($62). 

MIJLT  (X*Y — Z) 

X:  AB 
Y:  CD 

dirección:  $9000 
Z:  ABCD 

I  .os  números  a  multiplicar  se  colocan  en  X  e  Y.  X  se  coloca 
en  A  B  e  Y  en  C/  D:  después  se  llama  a  la  rutina  (JSR  $9000) 
y  el  resultado  (Z)  se  obtiene  en  A  B/C/D.  Este  formato  se 
utili/a  en  las  siguientes  rutinas  también. 

DIV  (X/Y  =  Z) 

X:  ABCD 
Y:  $69/ $6 A 

dirección:  $90 B 7 
Z :  AB 

DIV32  (X/ 32768 =Z) 


X 

dirección 

Z 


ABCD 

$914F 

AB 


ADD  (X  +  Y  =  Z) 

X:  AB 
Y:  CD 

dirección:  $9I6A 
Z:CD 

SUB  (X  Y=Z) 

X:  AB 
Y:  CD 

dirección:  $9178 
Z  :CD 

SIN  ((SIN(X)*32768=Z) 
X:  AB 

dirección:  $9187 
Z  :AB 

COS  ((COS(X)*32768=Z) 
X:  AB 

dirección:  $92B0 
Z:AB 

Rutinas  de  transformación: 

Registros: 


Coordenada  X,  Coordenada  Y,  Coordenada  Z 
$033C  $033 E  $0340 

WX  WY  WZ 

$0342  $0344  $0346 

ROTATE  (gira  WX,WY,WZ  grados  los 
puntos  X,Y,Z) 
x,y,z:  X,Y,Z 
wx,wy,wz:  WX,WY,WZ 
dirección:  $92DA 
nx,ny,nz:  X,Y,Z 

TRANSLATE  (mueve  WX,WY,WZ  unidades  los 
puntos  X,Y,Z) 
x,y,z:  X,Y,Z 
wx,wy,wz:  WX,WY,WZ 
dirección:  $94EF 
nx,ny,nz:  X,Y,Z 

SCALATE  (multiplica  X,Y,Z  con  WX,WY,WZ) 
x,y,z:  X,Y,Z 
wx,wy,wz:  WX,WY,WZ 
dirección:  $955D 
nx,ny,n’z:  X,Y,Z 

VIEW  (convierte  X,Y,Z  en  coordenadas 

de  pantalla,  según  WX,  el  punto 
de  vista  y  WZ,  el  plano  de  dibujo) 
punto  vista:  \/X 
plano  dibujo:  WY 
dirección:  $95CB 
x,y  pantalla:  X,Y 

Rutinas  de  dibujo: 

FINE  (dibuja  una  línea  entre  X0,Y0 

y  X 1 , Y I .  Con  BF=1  dibuja  y 
con  BF=0  borra) 

X0:  $5A/$5B  (16  bits) 

YO:  $5C  (8  bits) 

XI:  $5E/$5F  (16  bits) 

Yl:  $55  (8  bits) 

BF:  $02 

dirección:  $96C0 

SWAP  (intercambia  las  pantallas  de 
alta  resolución  1  y  2) 
dirección:  $987B 

GRON  (conecta  pantalla  gráfica) 
dirección:  $98CE 

GROFF  (desconecta  pantalla  gráfica) 
dirección:  $98DE 

GRCLR  (borra  pantalla  gráfica) 
dirección:  $98EE 

DRAWPLANE  (dibuja  el  plano  o  polígono 
indicado  en  $45) 

PLAÑE:  $45 
dirección:  $9950 

DRAWFRAME  (dibuja  el  objeto  indicado 
en  $45) 

FRAME:  $45 
dirección:  $99C6 

Rutinas  para  girar  planos  y  cuerpos: 

PLAÑE  (Se  convierte  a  formato  de 
pantalla  un  plano  según  los 
datos  de  $F9) 

PI.ANE:  $47 
WRP:  $F9 
dirección:  $9A0F 
resultado:  $45 

Esta  rutina  aprecia  el  grado  de 
rotación  del  plano. 
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■¡ALTO  AQUI!! 

CONOZCA  LOS  MEJORES  PROGRAMAS  PROFESIONALES 
TECNICOS  Y  DE  GESTION,  PARA  COMMODORE  64-128 


GESTION  COMERCIAL  -  128  I 

PROGRAMA  INTEGRADO  DE  FACTURACION  Y  CONTROL  DE  STOCKS 


Capacidades  de  ficheros  programables  por  el  usuario.  Mantenimiento  de  ficheros.  Control  de 
entradas/salidas  de  almacén.  Inventario  permanente.  Actualización  de  almacén.  Memoriza¬ 
ción  y  emisión  de  albaranes.  Facturación  de  albaranes  por  cliente  con  criterios  de  selección. 
Facturación  directa.  Emisión  de  recibos  y  letras  según  última  normativa.  Listado  de  ventas  con 
desglose  de  IVA.  Listados  definibles  por  el  usuario.  Paso  automático  a  CONTABILIDAD- 128. 


CONTABILIDAD  ■  128  j 

Basado  en  el  Plan  General  de  Contabilidad.  Hasta  1.500  cuentas  contables.  Niveles  progra¬ 
mables  (hasta  4).  Entradas  de  apuntes  con  control  de  cuadre  y  contrapartida  automática. 
Posibilidad  de  recomponer  apuntes.  Posibilidad  de  guardar  diarios  pendientes  de  actualizar. 
Extractos  por  pantalla  e  impresora  y  por  grupos  de  cuentas.  Balance  de  sumas  y  saldos  y 
situación.  Cuenta  de  explotación.  Gestión  de  IVA.  Listados  oficiales  de  IVA  soportado  y 
repercutido,  80  columnas  con  cualquier  monitor.  Un  único  disco  de  trabajo.  Gestiona  varias 
contabilidades.  Conexión  con  GESTION  COMERCIAL  128. 


ESTRUCTURAS 

Calcula  pórticos  planos  de  hormigón 
armado.  Calcula  los  esfuerzos  para  las 
tres  hipótesis  verticales,  viento  y  sismo. 
Armado  total  de  vigas  y  pilares.  Cuadro 
de  pesos  de  hierro.  Cuadro  cúbico  de 
hormigón.  Listado  de  todos  los  esfuer¬ 
zos  en  el  armado. 

HI  25.000 

FACTURACION 

Programa  de  facturación  directa.  Fi¬ 
chero  de  artículos  y  clientes.  Diarios  de 
ventas.  Desglose  de  impuestos.  Emi¬ 
sión  de  recibos.  Varias  versiones. 

0  15.000 


MEDICIONES 

Programa  de  mediciones  y  presupues¬ 
tos  de  obra  totalmente  programable 
por  el  usuario.  Listado  de  mediciones  y 
presupuesto  por  partidas.  Posibilidad 
de  ajuste  automático  de  presupuesto. 

0  25.000 


STOCKS 

Fichero  de  artículos  y  proveedores. 
Control  de  entrada-salida  de  almacén. 
Actualización  automática.  Inventario 
permanente.  Inventario  bajo  mínimos. 
Listados  varios. 

0  15.000 


CONTABILIDAD 

Basada  en  el  Plan  Contable  Español. 
300  ó  1.000  cuentas.  Contrapartida 
automática.  Extractos  por  pantalla  o 
impresora.  Balances  programables. 
Grupos  0  y  9.  Balance  de  situación  y 
cuenta  de  explotación  programable. 

0  25.000 


GESTION  CIAL-64 

Facturación  y  control  stocks.  1.000 
clientes,  2.000  artículos.  Entradas/Sa¬ 
lidas  almacén.  Inventario  permanente. 
Facturación  directa.  Emisión  de  reci¬ 
bos.  Paso  a  CONTABILIDAD  64. 


LOTO -64 

-  CALCULA  APUESTAS 

-  INFORMA  PROBABILIDADES 

-  ALMACENA  RESULTADOS 

-  REALIZA  ESCRUTINIO 

-  5.000  PTAS. 


LIDER  NACIONAL  EN  VENTAS 


tSJNFO,  SI 

SERVICIOS  DE  INFORMATICA 


w  (976)  226974-232961 


Avda.  de  Goya,  8  -  50006  ZARAGOZA 


FRAME  (Trata,  al  igual  que  la  rutina  anterior, 
un  objeto  completo,  solo  que  aquí  el 
puntero  se  encuentra  el  $71) 

FRAME:  $71 
WRP:  $F9 
dirección:  $9B6C 

FLZERO  (Coloca  el  giro  del  plano  en  su 
posición  original) 
dirección:  $9B56 

FRZERO  (Como  arriba  pero  para  el  cuerpo) 
dirección:  $9C73 

CLIPPING  (Esta  rutina  corta  las  líneas 

de  la  pantalla  de  dibujo  ficticia. 
FLAG  indica  si  debe  ser  dibujada) 
Xmín:  $C436 
Xmáx:  $C432 
Ymín:  $C438 
Ymáx:  $C434 
FLAG:  $CBA0 
dirección:  $C000 

Las  coordenadas  de  la  línea  se 
indican  como  en  la  rutina  LINE. 


El  resto  del  programa  sirve  para  dirigir  las  rutinas  de 
código  máquina  descritas,  y  está  pensado  únicamente  como 
demostración. 

Consejos  finales 


Los  listados  1  y  2  aparecen  como  volcados  hexadecimales 
con  cargador  BASIC.  Después  de  hacer  RUN  se  harán  los 
POKEs  en  la  memoria  y  se  grabará  automáticamente  el  pro¬ 
grama  objeto  (código  máquina)  en  el  disco.  Ten  cuidado  por¬ 
que  estos  dos  programas  Basic  se  autodestruyen  tras  ejecu¬ 
tarse.  No  debes  confundir  los  ficheros  “.OBJ”  con  los  “.OB”. 
Los  primeros  contienen  el  código  máquina  generado  por  los 
cargadores  BASIC  I  y  2.  Los  otros  son  el  indicativo  que 
añade  el  Turbografik  para  los  ficheros  de  objetos  que  tú  gra¬ 
bas:  hay  dos  ficheros  para  la  definición  de  un  objeto:  “.OB”  y 
“.DA”  Los  ficheros  “.FIL”  y  “.FDA”  continen  los  datos  de 
las  películas  editadas  que  grabas  en  disco. 

Como  consejo  general  para  teclear  todos  los  listados:  Utili¬ 
zad  el  corrector  PERFECTO.  No  olvidéis  ninguna  línea  de 
programa  y  comprobad  con  cuidado  las  sumas  de  control. 
Después  de  teclear  cualquier  listado,  grabadlo  en  el  disco 
antes  de  probarlo.  Ahorraréis  en  aspirinas  para  el  dolor  de 
cabeza.  ■ 


PROGRAMA «  GEN . TURBOGRAF I  LISTADO  1 

100  REM  GENERADOR  DE  "TURBOGRAFIK"  .198 

101  REM  (0  1987  MARTIN  LEIBBRANDT  .23 

102  REM  (0  1987  BY  COMMODORE  WORLD  .114 


1  03  I  t  -ycf 

104  P0KE56 , 1 28 i P0KE52 , 1 28 i CLR  ! 162 

105  A **36864  .93 

106  B-40949  \ 246 

107  FORI»ATOBi G0SUB1 10i POKEI ,V  .173 


108  8»B+PEEK (I)i NEXTi READT i IFS<  >TTH  .28 
ENPR I NT " L RVSON 3 ERROR  EN  DATAS! 

109  P0KE43 ,0i P0KE44 , 1 44  z  P0KE45 , 240  s  .201 
P0KE46 ,  1 59 1 SAVE " TURBOGRAF I K . OB J " , 8  * 

END 

110  V=0 1  READH$  z  GOSUB  lili  V*=V*  1 6 1  H$=M  .120 
ID*(H*,2> 

111  X«=ASC(H*>  1  V~V+X+48*(X<64)+55*(X  .167 
>64) iRETURN 

112  1  .88 

113  DATA  48 , 8A , 48 , 98  f  48 , A9 , 00 , 85  v  65  .19 

114  DATA  AD , 4E , 03 , D0 , 0E , A5 , 62 , D0 , 06  .222 

115  DATA  A5 ,61, C9 , 80 , F0 ,10, A5 ,61,10  .199 

116  DATA  1 8 , A9 , 00 , 8D , 4E , 03  ,  A9 , 00 , 38  .134 

117  DATA  E5,62,85,62,A9,00,E5,61 ,85  .87 

118  DATA  61, A9 , FF , 45 , 65 , 85 , 65 , A5 , 63  .72 

119  DATA  10, 13, 38, A9, 00, E5, 64,85, 64  .239 

120  DATA  A9 , 00 , E5 , 63 , 85 , 63 , A9 , FF , 45  .114 

121  DATA  65, 85, 65, A2, 10, A9, 00, 85, 69  .97 

122  DATA  85 , 6A , 85 , 6B , 85 , 6C , 06 , 64 , 26  .40 

123  DATA  63,90, 19, 18, A5, 62, 65,60,85  .93 

124  DATA  6C , A5 ,61, 65 , 6B , 85 , 6B , A9 , 00  .12 

125  DATA  65 , 6A , 85 , 6A , A9 , 00 , 65 , 69 , 85  .125 

126  DATA  69 , CA , F0 , 0B , 06 , 6C , 26 , 6B , 26  .158 

127  DATA  6A, 26, 69, 40, 57, 90, A5, 60,85  .119 

1 28  DATA  64 , A5 , 6B , 85 , 63 , A5 , 6A , 85 , 62  .156 

129  DATA  A5 , 69 , 85 ,61, A5 , 65 , F0 ,19, A9  .83 

130  DATA  00 , 38 , E5 , 64 , 85 , 64 , A9 , 00 , E5  .150 

131  DATA  63, 85, 63, A9, 00, E5, 62, 85, 62  .101 

132  DATA  A9 , 00 , E5 ,61, 85 ,61, 68 , A8 , 68  .172 

133  DATA  AA , 68 , 60 , A9 , 00 , 85 , 6B , 85 , 60  .115 

134  DATA  85 , 65 , A5 ,61 , 10, 1F, 38 , A9 , 00  .30 

135  DATA  E5 , 64 , 85 , 64 , A9 , 00 , E5 , 63 , 85  .173 

136  DATA  63 , A9 , 00 , E5 , 62 , 85 , 62 , A9 , 00  .230 

137  DATA  E5 ,61, 85 ,61, A9 , FF , 45 , 65 , 85  .185 

138  DATA  65 , A5 , 69 , 10, 13, 38 , A9 , 00 , E5  .208 

139  DATA  6A , 85 , 6A , A9 , 00 , E5 , 69 , 85 , 69  .185 

140  DATA  A9 , FF , 45 , 65 , 85 , 65 , A0 ,11, 38  .238 

141  DATA  A5 , 62 , E5 , 6A , A5 ,61, E5 , 69 , B0  .119 

142  DATA  12,06,64,26,63,26,62,26,61  .24 

143  DATA  06 , 60 , 26 , 6B , 88 , D0 , E6 , 40 , 35  .97 

144  DATA  91,38,A5,62,E5,6A,85,62,A5  .108 

145  DATA  61 ,E5, 69, 85, 61 ,06,64,26,63  .227 

146  DATA  26, 62, 26, 61, 38, 26, 60, 26, 6B  .90 


147  DATA  88 , D0 , 06 , A5 , 60 , 85 , 62 , A5 , 6B  .231 

148  DATA  85,61 , A5 , 65 , F0 , 0D , 38 , A9 , 00  .34 

149  DATA  E5 , 62 , 85 , 62 , A9 , 00 , E5 ,61, 85  .119 

150  DATA  61 ,60,06,63,26,62,26,61 ,A9  .214 

151  DATA  00, 10,02, E6, 62, A5, 61 ,85,63  .105 

152  DATA  A5, 62, 85, 64, A9, 00, 85, 61, 85  .250 

153  DATA  62,60, 18, A5, 64, 65, 62, 85, 64  .219 

154  DATA  A5, 63, 65, 61 ,85, 63, 60,38, A5  .144 

155  DATA  62 , E5 , 64 , 85 , 64 , A5 ,61, E5 , 63  .121 

156  DATA  85,63, IB, 60, A5, 61 ,D0,42,A5  .86 

157  DATA  62 , 30 , 04 , 09 , 5B , 30 , 5A , 09 , B4  .29 

158  DATA  10, 0A , A9 , B4 , 38 , E5 , 62 , 85 , 62  .82 

159  DATA  4C,ED,91 ,A5, 62,38, E9,B4, 85  .121 

160  DATA  62, A9, 00, 85, 61 ,20, ED, 91 ,38  .198 

161  DATA  A9 , 00 , E5 , 62 , 85 , 62 , A9 , 00 , E5  .185 

162  DATA  61 ,85,61 , 18, A5,62,D0,0B, A5  .80 

163  DATA  61, 09 , 80 , D0 , 05 , A9 ,01, 8D , 4E  .131 

164  DATA  03 , 60 , A5 , 62 , 09 , 0F , 30 , CE , A9  .186 

165  DATA  68, 38, E5, 62, 85, 62, 18,20, ED  .201 

166  DATA  91, 38 , A9 , 00 , E5 , 62 , 85 , 62 , A9  .186 

167  DATA  00, E5, 61, 85, 61, 18, 60, A6, 62  .171 

168  DATA  BD,FA,91 , 85, 62, BD, 55, 92, 85  .192 

169  DATA  61, 60 , 00 , 3B , 77 , B2 , ED , 27 ,61  .79 

170  DATA  99 , D0 , 06 , 3A , 60 , 90 , CB , F7 , 20  .116 

171  DATA  48 , 60 , BD , AC , 07 , DF , F3 , 03 , 0F  .59 

172  DATA  18, 10, 10, 17, 0E , 00 , EC , D4 , B6  .90 

1 73  DAT A  93 , 6A , 30 , 08 , CD , BD , 46 , F9 , A6  .137 

174  DATA  4B , EA , 82 ,13, 90 , 1 F , 9A , 0D , 79  .122 

175  DATA  DD , 39 , 8D , D9 , 1 D , 59 , 80 , B7 , D9  .49 

176  DATA  F3 , 04 , 00 , 0B ,01, EF , D3 , AD , 7F  .210 

177  DATA  47 , 06 , BC , 68 , 0A , A3 , 32 , B8 , 33  .103 

178  DATA  A5, 0E, 60, C1 ,0B, 40,83, B0,D3  .176 

179  DATA  EO , FB , 00 , 00 , 02 , 04 , 06 , 08 , 0B  .131 

180  DATA  0D,0F,11,14,16,1B,1A,1C,1E  .216 

181  DATA  21, 23 , 25 , 27 , 29 , 2B , 2D , 2F , 32  .211 

182  DATA  34, 36, 38, 3A, 30, 3E, 40, 41 ,43  .254 

183  DATA  45 , 47 , 49 , 4B , 4D , 4E , 50 , 52 , 53  .191 

184  DATA  55 , 57 , 58 , 5A , 50 , 5D , 5F , 60 , 62  .236 

185  DATA  63 , 64 , 66 , 67 , 68 , 6A , 6B , 60 , 6D  .33 

186  DATA  6E,6F, 71 ,72,73,74,74,75,76  .110 

187  DATA  77 , 78 ,79,79,7A,7B,7B,7C,7C  .189 

188  DATA  7D,7D,7E,7E,7E,7F,7F,7F,7F  .162 

189  DATA  7F , 7F , 7F , 80 , A5 , 61 , D0 ,10, A5  .169 

190  DATA  62, 18,69, 5A, 85,62, A9, 00, 65  .158 

191  DATA  61, 85, 61, 40, 87, 91, A5, 62, 09  .151 

192  DATA  0E , 30 , EA ,18, 69 , 5A , 38 , E9 , 68  .202 

193  DATA  85,62, 18, A9, 00, 85, 61 ,40,87  .223 

194  DATA  91 ,48, 8A, 48, 98,48, AD , 30, 03  .170 

195  DATA  85 , 64 , AD , 3D , 03 , 85 , 63 , AD , 46  .23 

196  DATA  03, 85, 62, AD, 47, 03, 85, 61 ,20  .48 

197  DATA  B0, 92, 20, 00, 90, 20, 4F, 91 ,A5  .167 

198  DATA  63 , 85 , 6D , A5 , 64 , 85 , 6E , AD , 3E  .68 

199  DATA  03 , 85 , 64 , AD , 3F , 03 , 85 , 63 , AD  .133 

200  DATA  46, 03, 85, 62, AD, 47, 03, 85, 61  .24 
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201  DATA  20,87,91 , 20 , 00 , 90 , 20 , 4F , 9 1  .21 

202  DAT  A  A5 , 6D , 85 , 6 1 , A5 , 6E , 85 , 62 , 20  .  18 

203  DATA  78,91 ,A5, 63, 8D, 48,03, A5, 64  .131 

204  DATA  8D , 49 , 03 , AD , 3E , 03 , 85 , 64 , AD  .206 

205  DATA  3F, 03, 85, 63, AD, 46, 03, 85, 62  .61 

206  DATA  AD, 47, 03, 85, 61 ,20, B0, 92, 20  .74 

207  DATA  00 , 90 , 20 , 4F ,91, A5 , 63 , 85 , 6D  .161 

208  DATA  A5 , 64 , 85 , 6E , AD , 3C , 03 , 85 , 64  .104 

209  DAT  A  AD , 3D , 03 , 85 , 63 , AD , 46 , 03 , 85  .169 

210  DATA  62, AD, 47, 03, 85, 61 ,20,87,91  .96 

211  DATA  20, 00, 90, 20, 4F, 91 ,A5,6D,85  .15 

212  DATA  61, A5 , 6E , 85 , 62 , 20 , 6A ,91, A5  .230 

2 1 3  DAT  A  63 , 8D , 4A , 03 , A5 , 64 , BD , 4B , 03  .169 

•  214  DATA  AD, 48, 03, 85, 63, AD, 49, 03, 85  .170 

215  DATA  64, AD, 44, 03, 85, 62, AD, 45, 03  .57 

216  DATA  85,61 ,20, B0 , 92, 20, 00, 90, 20  .202 

217  DATA  4F ,91, A5 , 63 , 85 , 6D , A5 , 64 , 85  .105 

218  DATA  6E , AD , 40 , 03 , 85 , 64 , AD ,41, 03  .68 

219  DATA  85, 63, AD, 44, 03, 85, 62, AD, 45  .109 

220  DATA  03,85,61,20,87,91,20,00,90  .20 

221  DATA  20 , 4F ,91, A5 , 6D , 85 ,61, A5 , 6E  .81 

222  DATA  85 , 62 , 20 , 6A , 91 , A5 , 63 , 8D , 3D  .8 

223  DATA  03 , A5 , 64 , 8D , 3C , 03 , AD , 40 , 03  .145 

224  DATA  85 , 64 , AD , 4 1 , 03 , 85 , 63 , AD , 44  .194 

225  DATA  03 , 85 , 62 , AD , 45 , 03 , 85 , 6 1 , 20  .75 

226  DATA  B0 , 92 , 20 , 00 , 90 , 20 , 4F , 9 1 , A5  .196 

227  DATA  63 , 85 , 6D , A5 , 64 , 85 , 6E , AD , 48  .153 

228  DATA  03 , 85 , 63 , AD , 49 , 03 , 85 , 64 , AD  .20 

229  DATA  44 , 03 , 85 , 62 , AD , 45 , 03 , 85 , 61  .5 

230  DATA  20,87,91 ,20, 00, 90,20, 4F , 91  .50 

231  DATA  A5 , 6D , 85 ,61, A5 , 6E , 85 , 62 , 20  .47 

232  DATA  78 , 9 1 , A5 , 63 , 8D , 4C , 03 , A5 , 64  .248 

233  DATA  8D , 4D , 03 , AD , 4A , 03 , 85 , 63 , AD  .235 

234  DATA  4B , 03 , 85 , 64 , AD , 42 , 03 , 85 , 62  .34 

235  DATA  AD , 43 , 03 , 85 , 61 , 20 , B0 , 92 , 20  .101 

236  DATA  00 , 90 , 20 , 4F , 9 1 , A5 , 63 , 85 , 6D  .190 

237  DATA  A5 , 64 , 85 , 6E , AD , 4C , 03 , 85 , 63  .121 

238  DATA  AD , 4D , 03 , 85 , 64 , AD , 42 , 03 , 85  .6 

239  DATA  62, AD, 43, 03, 85, 61 ,20,87,91  .109 

240  DATA  20 , 00 , 90 , 20 , 4F ,91, A5 , 6D , 85  .44 

241  DATA  61 , A5 , 6E , 85 , 62 , 20 , 78,91 , A5  .225 

242  DATA  63 , 8D , 3F , 03 , A5 , 64 , 8D , 3E , 03  .222 

243  DATA  AD , 4C , 03 , 85 , 63 , AD , 4D , 03 , 85  .17 

244  DATA  64 , AD , 42 , 03 , 85 , 62 , AD , 43 , 03  .74 

245  DATA  85,61 ,20, B0, 92, 20, 00, 90, 20  .231 

246  DATA  4F , 91 , A5 , 63 , 85 , 6D , A5 , 64 , 85  .134 

247  DAT  A  6E , AD , 4A , 03 , 85 , 63 , AD , 4B , 03  .193 

248  DATA  85 , 64 , AD , 42 , 03 , 85 , 62 , AD , 43  .170 

249  DATA  03,85,61,20,87,91,20,00,90  .49 

250  DATA  20 , 4F ,91, A5 , 6D , 85 ,61, A5 , 6E  .110 

251  DATA  85 , 62 , 20 , 6A ,91, A5 , 63 , 8D ,41  .253 

252  DATA  03 , A5 , 64 , 8D , 40 , 03 , 68 , A8 , 68  .82 

253  DATA  AA , 68 , 60 , 48 , 8A , 48 , 98 , 48 , AD  .99 

254  DATA  3C, 03, 85, 62, AD, 30,03,85, 61  .122 

255  DATA  AD , 42 , 03 , 85 , 64 , AD , 43 , 03 , 85  .79 

256  DATA  63 , 20 , 6A , 91 , A5 , 64 , 8D, 3C , 03  .159 

257  DATA  A5 , 63 , 8D , 3D , 03 , AD , 3E , 03 , 85  .172 

258  DATA  62 , AD , 3F , 03 , 85 , 61 , AD , 44 , 03  .131 

259  DATA  85 , 64 , AD , 45 , 03 , 85 , 63 , 20 , 6A  .14 

260  DATA  91, A5 , 64 , 8D , 3E , 03 , A5 , 63 , 8D  .117 

261  DATA  3F , 03 , AD , 40 , 03 , 85 , 62 , AD ,41  .62 

262  DATA  03,85,61 ,AD, 46, 03, 85,64, AD  .43 

263  DATA  47 , 03 , 85 , 63 , 20 , 6A , 91 , A5 , 64  .34 

264  DATA  8D,40,03, A5,63,8D,41 ,03,68  .25 

265  DATA  A8,68, AA,68,60,48,8A,48,98  .108 

266  DATA  48 , AD , 3C , 03 , 85 , 62 , AD , 3D , 03  .247 

267  DATA  85 , 61 , AD , 42 , 03 , 85 , 64 , AD , 43  .190 

268  DATA  03 , 85 , 63 , 20 , 00 , 90 , A5 , 64 , 8D  .163 

269  DATA  3C , 03 , A5 , 63 , 8D , 3D , 03 , AD , 3E  .136 

270  DATA  03 , 85 , 62 , AD , 3F , 03 , 85 ,61, AD  .193 

*  271  DATA  44, 03, 85, 64, AD, 45, 03, 85, 63  .144 

272  DATA  20 , 00 , 90 , A5 , 64 , 8D , 3E , 03 , A5  .195 

273  DATA  63 , 8D , 3F , 03 , AD , 40 , 03 , 85 , 62  .160 

274  DATA  AD , 4 1 , 03 , 85 , 61 , AD , 46 , 03 , 85  .161 

275  DATA  64 , AD , 47 , 03 , B5 , 63 , 20 , 00 , 90  .172 

276  DATA  A5 , 64 , 8D , 40 , 03 , A5 , 63 , 8D , 41  .249 

277  DATA  03 , 68 , A8 , 68 , AA , 68 , 60 , 48 , 8A  .26 

278  DATA  48 , 98 , 48 , AD , 42 , 03 , 85 , 62 , AD  .125 

279  DATA  43 , 03 , 85 , 61 , AD , 44 , 03 , 85 , 64  .48 

280  DATA  AD , 45 , 03 , 85 , 63 , 20 ,78,91 , A5  .251 

281  DATA  63 , 8D , 48 , 03 , A5 , 64 , 8D , 49 , 03  .182 

282  DATA  AD , 42 , 03 , 85 , 62 , AD , 43 , 03 , 85  .105 

283  DATA  61 , AD , 40 , 03 , 85 , 64 , AD , 4 1 , 03  .70 

284  DATA  85,63,20,78,91 ,A5, 63, 8D,4A  .143 

285  DATA  03 , A5 , 64 , 8D , 4B , 03 , AD , 3C , 03  .116 


286 

DATA 

85 , 62 , AD , 3D , 03 , 85 , 61 , AD , 48  .19 

287 

DATA 

03, 85, 63, AD, 49, 03, 85, 64, 20  .152 

288 

DATA 

00 , 90 , AD , 4A , 03 , 85 , 69 , AD , 4B  .149 

289 

DATA 

03 , 85 , 6A , 20 , B7 , 90 , A5 , 62 , 8D  .0 

290 

DATA 

3C , 03 , A5 ,61, 8D , 3D , 03 , AD , 3E  .93 

291 

DATA 

03 , 85 , 62 , AD , 3F , 03 , 85 ,61, AD  .214 

292 

DATA 

48, 03, 85, 63, AD, 49, 03, 85, 64  .245 

293 

DATA 

20 , 00 , 90 , AD , 4 A , 03 , 85 , 69 , AD  .190 

294 

DATA 

4B , 03 , 85 , 6A , 20 , B7 , 90 , A5 ,61  .37 

295 

DATA 

8D , 3F , 03 , A5 , 62 , 8D , 3E , 03 , 68  .230 

296 

DATA 

A8 , 68 , AA , 68 , 60 , A6 , 5C , 8A , 29  .189 

297 

DATA 

07 , 85 , 57 , 8A , 4A , 29 , 7C , 4A , A8  .176 

298 

DATA 

A5 , 5A , 29 , F8 , 05 , 57 , 79 , 49 , 98  .61 

299 

DATA 

85 , 57 , A5 , 5B , 79 , 4A , 98 , 85 , 58  .226 

300 

DATA 

A5 , 5A , 29 , 07 , A8 , B9 , 37 , 98 , 85  .89 

301 

DATA 

59, 60, 78, A9, 35, 85, 01 ,A0,00  .126 

302 

DATA 

A5 , 02 , D0 , 0B , A5 , 59 , 49 , FF ,31  .29 

303 

DATA 

57,91 ,57, 4C,BA, 96, B1 ,57,05  .60 

304 

DATA 

59,91 ,57, A9, 37, 85,01 ,EA, 60  .17 

305 

DATA 

20 , 00 , C0 , AD , A0 , CB , C9 ,01, D0  .58 

306 

DATA 

03 , 4C , A2 , 97 , 38 , A5 , 5E , E5 , 5A  .83 

307 

DATA 

85 , 60 , A5 , 5F , E5 , 5B , 85 ,61, B0  .50 

308 

DATA 

10, A9 ,01, E5 , 60 , 85 , 60 , A9 , 00  .189 

309 

DATA 

E5,61 ,85,61 ,A2,04,D0,0B,D0  .88 

310 

DATA 

07 , A5 , 60 , D0 , 03 , A2 , 08 , 2C , A2  .121 

311 

DATA 

06 , BD , 3F , 98 , 8D , 95 , 97 , BD ,40  .78 

312 

DATA 

98 , BD ,96,97 , 38 , A5 , 55 , E5 , 5C  .141 

313 

DATA 

85 , 63 , B0 , 0A , 49 , FF , 85 , 63 , E6  .22 

314 

DATA 

63 , A2 , 00 , F0 , 07 , D0 , 03 , A2 , 08  .133 

315 

DATA 

2C , A2 , 02 , BD , 3F , 98 , 8D , 98 , 97  .214 

316 

DATA 

BD , 40 , 98 , 8D , 99 , 97 , A5 , 61 , D0  .205 

317 

DATA 

10, A5 , 60 , C5 , 63 , B0 , 0A , A5 , 60  .94 

318 

DATA 

A6, 63, 85, 63, 86, 60, 90, 18, AD  .193 

319 

DATA 

95 , 97 , AE , 98 , 97 , 8D , 98 , 97 , 8E  .84 

320 

DATA 

95 , 97 , AD , 96 , 97 , AE , 99 , 97 , 8D  .109 

321 

DATA 

99 , 97 , 8E , 96 , 97 , A5 , 61 , 4A , 85  .218 

322 

DATA 

6A , A5 , 60 , 6 A , 69 , 00 , 85 , 69 , A5  .173 

323 

DATA 

60, 85, 67, A5, 61 ,85,68,20,74  .238 

324 

DATA 

96, 18, A5, 63, 65, 69, 85, 69, 90  .201 

325 

DATA 

02,E6,6A,A5,6A,C5,61,90,1A  .244 

326 

DATA 

D0 , 08 , A5 , 69 , C5 , 60 , 90 ,12, F0  .183 

327 

DATA 

10, 38 , A5 , 69 , E5 , 60 , 85 , 69 , A5  .60 

328 

DATA 

6A , E5 ,61, 85 , 6A , 20 , C6 , 97 , 20  .63 

329 

DATA 

C7,97,A5,67,D0,07,A5,68,D0  .126 

330 

DATA 

01 ,60,C6,68,C6,67,20,9E,96  .13 

331 

DATA 

4C , 6C , 97 , A5 , 57 , D0 , 02 , C6 , 58  .62 

332 

DATA 

C6 , 57 , 29 , 07 , D0 , 0D , C6 , 58 , A5  .35 

333 

DATA 

57 , 38 , E9 , 38 , 85 , 57 , B0 , 02 , C6  .82 

334 

DATA 

58 , 60 , E6 , 57 , D0 , 02 , E6 , 58 , A5  .171 

335 

DATA 

57 , AA , 29 , 07 , D0 , F2 , 8A , E6 , 58  .212 

336 

DATA 

18, 69 , 38 , 85 , 57 , 90 , E8 , E6 , 58  .213 

337 

DATA 

60, 06, 59, 90, El ,26, 59,38, A5  .106 

338 

DATA 

57 , E9 , 08 , 85 , 57 , B0 , D6 , C6 , 58  .41 

339 

DATA 

60, 46, 59, 90, CF, 66, 59, 18, A5  .144 

340 

DATA 

57 , 69 , 08 , 85 , 57 , 90 , C4 , E6 , 58  .163 

341 

DATA 

60, 00, E0, 40, El ,80,E2,C0,E3  .62 

342 

DATA 

00 , E5 , 40 , E6 , 80 , E7 , C0 , E8 , 00  .229 

343 

DATA 

EA , 40 , EB , 80 , EC , C0 , ED , 00 , EF  .54 

344 

DATA 

40 , F0 , 80 , F 1 , C0 , F2 , 00 , F4 , 40  .85 

345 

DATA 

F5 , 80 , F6 , C0 , F7 , 00 , F9 , 40 , FA  .64 

346 

DATA 

80 , FB , C0 , FC , 00 , FE , 80 , 40 , 20  .191 

347 

DATA 

10, 08, 04, 02, 01, AD, 97, C7, 97  .242 

348 

DATA 

El , 97 ,F3 , 97 , C6 , 97 , 00 , A0 , 40  .53 

349 

DATA 

Al, 80 , A2 , C0 , A3 , 00 , A5 , 40 , A6  .194 

350 

DATA 

80 , A7 , C0 , A8 , 00 , AA , 40 , AB , 80  .247 

351 

DATA 

AC , C0 , AD , 00 , AF , 40 , B0 , 80 , B 1  .124 

352 

DATA 

C0 , B2 , 00 , B4 , 40 , B5 , 80 , B6 , C0  .223 

353 

DATA 

B7 , 00 , B9 , 40 , BA , 80 , BB , C0 , BC  .84 

354 

DATA 

00 , BE , 48 , BA , 48 , 98 , 48 , AD , CD  .209 

355 

DATA 

98 , D0 , 24 , A0 , 05 , 8C , 88 , 96 , C8  .218 

356 

DATA 

BC , 8F , 96 , A0 , 98 , 8C , 89 , 96 , BC  .191 

357 

DATA 

90 , 96 , A9 , 95 , 8D , 00 , DD , AD , CD  .176 

358 

DATA 

98 , 49 , FF , 8D , CD , 98 , 68 , A8 , 68  .103 

359 

DATA 

AA , 68 , 60 , A0 , 49 , 8C , 88 , 96 , C8  .44 

360 

DATA 

BC , 8F , 96 , A0 , 98 , 8C , 89 , 96 , 8C  .195 

361 

DATA 

90 , 96 , A9 , 94 , 8D , 00 , DD , AD , CD  .148 

362 

DATA 

98 , 49 , FF , 8D , CD , 98 , 68 , A8 , 68  .107 

363 

DATA 

AA , 68 , 60 , 00 , A9 , 94 , 8D , 00 , DD  .232 

364 

DATA 

A9,3B,8D, 1 1 ,D0,A9,38,8D, 18  .39 

365 

DATA 

D0 , 60 , A9 , 97 , 8D , 00 , DD , A9 , 9B  .6 

366 

DATA 

8D, 11 ,D0,A9, 15, 8D, 18,D0,60  .73 

367 

DATA 

A2 , 1 E , AD , CD , 98 , F0 , 03 , A0 , E0  .252 

368 

DATA 

2C , A0 , A0 , 84 ,61, A0 , 00 , 84 , 60  .55 

369 

DATA 

98 ,91, 60 , C8 , D0 , FB , E6 ,61, CA  .150 

370 

DATA 

10,F6,A0,40,91 ,60,88, 10, FB  .111 
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371 

DATA 

AD , 4F , 99 , 29 , 0F , 85 , 60 , AD , 4E 

.30 

456 

DATA 

8A ,91, 45 , E6 , 45 , D0 , 02 , E6 , 46  .23 

372 

DATA 

99,0A,0A,0A,0A,05,60,A8,AD 

.  181 

457 

DATA 

20 , 56 , 9B , 20 , 0F , 9A , 20 , 56 , 9B  .172 

373 

DATA 

CD , 98 , D0 ,13, 98 , A0 , 00 , 99 , 00 

.  174 

458 

DATA 

A5 , F7 , 85 , 47 , A0 , 00 , A5 , F8 , 85  .39 

374 

DATA 

CC , 99 , 00 , CD , 99 , 00 , CE , 99 , 00 

.  157 

459 

DATA 

48, AD, 52, 9B, 18,69,04,85,45  .158 

375 

DATA 

CF , C8 , D0 , F 1 , 60 , 98 , A0 , 00 , 99 

.214 

460 

DATA 

AD , 53 , 9B , 69 , 00 , 85 , 46 , CA , D0  .235 

376 

DATA 

00 , 8C , 99 , 00 , 8D , 99 , 00 , 8E , 99 

.93 

461 

DATA 

DB , A0 , 00 , B9 , 63 , 9C ,91, F9 , C8  .14 

377 

DATA 

00 ,8F,C8,D0,F1 ,60,01 ,00,48 

.  168 

462 

DATA 

C0 , 06 , D0 , F6 , AD ,71, 9C , A6 , 45  .123 

378 

DATA 

8A,48,98,48,A5,45,85,14,A5 

.  197 

463 

DATA 

85 , 45 , 8E ,71, 9C , AD , 72 , 9C , A6  .100 

379 

DATA 

46 , 85 , 15, A0 , 04  ,  B 1  , 14,D0,0D 

.6 

464 

DATA 

46 , 85 , 46 , 8E , 72 , 9C , 68 , A8 , 68  .129 

380 

DATA 

C8 , B 1 , 14, C9 , 80 , D0 , 06 , 68 , A8 

.  135 

465 

DATA 

AA, 68, 60, 00, 00, 00, 00, 00, 00  .144 

381 

DATA 

68,AA,68,60,A0,00,B1 , 14, 18 

.  182 

466 

DATA 

00,46,00,00,00,00,00,00,92  .213 

382 

DATA 

6D , 3C , 03 , 85 , 5E , C8 , B 1 , 1 4 , 6D 

.27 

467 

DATA 

30 , 48 , 8A , 48 , 98 , 48 , A0 , 05 , A9  .62 

383 

DATA 

3D , 03 , 85 , 5F , C8 ,B1,14,18, 6D 

.  172 

468 

DATA 

00 , 99 , 6A , 9C , 88 ,10, F8 , 68 , A8  .101 

384 

DATA 

3E, 03, 85, 55, CB, B1 , 14,69,00 

.49 

469 

DATA 

68, AA, 68, 60, 20, CE, 98, A9, 01  .194 

385 

DATA 

85 , 56 , C8 , B 1 , 1 4 , 1 8 , 6D , 3C , 03 

.90 

470 

DATA 

8D , 4E , 99 , A9 , 00 , 8D , 4F , 99 , 20  .209 

386 

DATA 

85 , 5A , C8 , B 1 , 1 4 , 6D , 3D , 03 , 85 

.47 

471 

DATA 

EE , 98 , 20 , 7B , 98 , 20 , EE , 98 , A9  .14 

387 

DATA 

5B,CB,B1 ,14, 18 , 6D , 3E , 03 , 85 

.92 

472 

DATA 

00,85,71 ,A9, 30, 85,72, A9, 45  .243 

388 

DATA 

5C , C8 , B 1 , 1 4 , 69 , 00 , 85 , 5D , 20 

.  129 

473 

DATA 

85 , F9 , A9 , 30 , 85 , FA , A9 ,61, 85  .102 

389 

DATA 

C0, 96, A5, 14, 18,69,04,85, 14 

.2 

474 

DATA 

45 , A9 , 30 , 85 , 46 , 20 , 6C , 9B , A9  .167 

390 

DATA 

A5, 15,69,00,85, 15, 4C,5D, 99 

.  101 

475 

DATA 

64 , 8D , 3E , 03 , A9 , A0 , 8D , 3C , 03  .226 

391 

DATA 

48 , 8A , 48 , 98 , 48 , A5 , 45 , 8D , 0D 

.  170 

476 

DATA 

A9 , 00 , 8D , 3D , 03 , 20 , C6 , 99 , 20  .185 

392 

DATA 

9A , A5 , 46 , 8D , 0E , 9A , A0 , 00 , B 1 

.225 

477 

DATA 

7B , 98 , A9 ,01, 8D , 07 , 9E , A9 , 00  .82 

393 

DATA 

45 , AA , E6 , 45 , D0 , 02 , E6 , 46 , 20 

.218 

478 

DATA 

A0 , 05 , 99 , FD , 9D , 99 , F7 , 9D , 88  .15 

394 

DATA 

50, 99, A5, 14, 18,69,08,85,45 

.63 

479 

DATA 

10, F7 , 20 , 73 , 9C , 58 , A5 , CB , C9  .10 

395 

DATA 

A5 ,15, 69 , 00 , 85 , 46 , CA , D0 , ED 

.214 

480 

DATA 

40 , F0 , 2C , C9 , 38 , D0 , 08 , A9 ,01  .209 

396 

DATA 

AD , 0D , 9A , A6 , 45 , 85 , 45 , 8E , 0D 

.  159 

481 

DATA 

8D , 07 , 9E , 4C ,16, 9D , C9 , 3B , D0  .58 

397 

DATA 

9A , AD , 0E , 9A , A6 , 46 , 85 , 46 , 8E 

.  130 

482 

DATA 

08 , A9 , 02 , 8D , 07 , 9E , 4C ,16, 9D  .119 

398 

DATA 

0E , 9A , 68 , A8 , 68 , AA , 68 , 60 , 92 

.  133 

483 

DATA 

C9 , 08 , D0 , 08 , A9 , 03 , 8D , 07 , 9E  .38 

399 

DATA 

30 , 48 , 8A , 48 , 98 , 48 , A5 , 45 , 8D 

.  168 

484 

DATA 

4C ,16, 9D , C9 , 3C , D0 , 04 , 20 , DE  .159 

400 

DATA 

52 , 9B , A5 , 46 , 8D , 53 , 9B , A5 , 47 

.  133 

485 

DATA 

98 , 60 , A9 , 00 , A0 , 03 , 99 , 03 , 9E  .172 

401 

DATA 

85 , F7 , A5 , 48 , 85 , F8 , A9 , 4C , 38 

.2 

486 

DATA 

88, 10,FA,A9,01 ,A0,00,2C,00  .143 

402 

DATA 

E9 , 06 , 85 , 6F , A9 , 9B , E9 , 00 , 85 

.99 

487 

DATA 

DC , D0 , 08 , A9 , 05 , 8D , 03 , 9E , A9  .118 

403 

DATA 

70 ,18, A0 , 00 , B 1 , F7 , AA , E6 , F7 

.  12 

488 

DATA 

01 ,C8,0A,2C,00,DC,D0,0D,A9  .201 

404 

DATA 

D0 , 02 , E6 , F8 , A0 , 06 ,18,B1,F9 

.  157 

489 

DATA 

FF , 8D , 04 , 9E , A9 , FB , 8D , 03 , 9E  .254 

405 

DATA 

71, 6F ,91, 6F , C8 , B 1 ,F9,71 , 6F 

.  186 

490 

DATA 

A9 , 02 , C8 , 0A , 2C , 00 , DC , D0 , 0D  .177 

406 

DATA 

91 ,6F,C8,C0,0C,D0,ED,A9,00 

.  185 

491 

DATA 

A9 , FF , 8D , 06 , 9E , A9 , FB , 8D , 05  .58 

407 

DATA 

8D,54,9B,A0,07,B1 ,6F,F0,2B 

.66 

492 

DATA 

9E , A9 , 04 , C8 , 0A , 2C , 00 , DC , D0  .175 

408 

DATA 

88 , B 1 , 6F , 30 ,13, C8 , 8D , 55 , 9B 

.25 

493 

DATA 

08 , A9 , 05 , 8D , 05 , 9E , A9 , 08 , C8  .62 

409 

DATA 

B 1 , 6F , 38 , E9 ,01, D0 , 07 , AD , 55 

.  188 

494 

DATA 

0A , 2C , 00 , DC , D0 , 24 , AD , 03 , 9E  .55 

410 

DATA 

9B , C9 , 68 , 30 ,14, 88 , 38 , B 1 , 6F 

.37 

495 

DATA 

C9 , FB , D0 , 08 , A9 , F6 , 8D , 03 , 9E  .40 

411 

DATA 

E9 , 68 ,91, 6F , C8 , B 1 , 6F , E9 ,01 

.  136 

496 

DATA 

4C , 7D , 9D , 0E , 03 , 9E , AD , 06 , 9E  .67 

412 

DATA 

91, 6F , A9 ,01, 8D , 54 , 9B , C8 , C8 

.  171 

497 

DATA 

10, 09 , A9 , F6 , BD , 05 , 9E , C8 , 4C  .148 

413 

DATA 

C0 , 0D , D0 , CB , AD , 54 , 9B , D0 , BF 

.232 

498 

DATA 

8F,9D,0E,05,9E,C8,88, 10,03  .199 

414 

DATA 

A0 , 05 , B 1 , F7 , 99 , 3C , 03 , 88 ,10 

.  183 

499 

DATA 

4C , E3 , 9C , 20 , 73 , 9C , AD , 07 , 9E  .50 

415 

DATA 

FB , A0 , 00 , B 1 , F9 , 99 , 42 , 03 , C8 

.  136 

500 

DATA 

38 , E9 ,01,18, 0A ,18, 69 ,12, A8  .103 

416 

DATA 

C0 , 06 , D0 , F6 , 20 , EF , 94 , B 1 ,6F 

.233 

501 

DATA 

AD , 05 , 9E , 79 , E5 , 9D , 99 , E5 , 9D  .46 

417 

DATA 

99 , 3C , 03 , C8 , C0 , 0C , D0 , F6 , 20 

.  108 

502 

DATA 

91, F9 , C8 , AD , 06 , 9E , 79 , E5 , 9D  .97 

418 

DATA 

DA , 92 , B1 , F9 , 99 , 36 , 03 , C8 , C0 

.27 

503 

DATA 

99 , E5 , 9D ,91, F9 , 88 , 98 , 38 , E9  .38 

419 

DATA 

12, D0 , F6 , 20 , 5D , 95 , B 1 , F9 , 99 

.46 

504 

DATA 

0C , A8 , 18 , AD , 03 , 9E , 79 , F7 , 9D  .87 

420 

DATA 

30 , 03 , C8 , C0 ,18, D0 , F6 , 20 , EF 

.  113 

505 

DATA 

99 , F7 , 9D ,91, F9 , C8 , AD , 04 , 9E  .240 

421 

DATA 

94 , B1 , F9 , 99 , 2A , 03 , C8 , C0 , 1 C 

.  164 

506 

DATA 

79 , F7 , 9D , 99 , F7 , 9D ,91 , F9 , 20  .233 

422 

DATA 

D0 , F6 , 20 , CB , 95 , A0 , 00 , AD , 3C 

.45 

507 

DATA 

6C , 9B , A9 , 64 , 8D , 3E , 03 , A9 , A0  .154 

423 

DATA 

03,91 ,45,C8,AD,3D,03,91 ,45 

.0 

508 

DATA 

8D , 3C , 03 , A9 , 00 , 8D , 3D , 03 , 20  .213 

424 

DATA 

C8 , AD , 3E , 03 ,91, 45 , C8 , AD , 3F 

.51 

509 

DATA 

C6 , 99 , 20 , 7B , 98 , 20 , EE , 98 , 4C  .236 

425 

DATA 

03,91 ,45, C8, 18, A5, 45, 69, 04 

.  142 

510 

DATA 

E3 , 9C , 00 , 00 , 05 , 00 , 00 , 00 , 46  .189 

426 

DATA 

85 , 45 , A9 , 00 , 65 , 46 , 85 , 46 , A5 

.  15 

511 

DATA 

00,00,00,00,00,00,00,00,00  .148 

427 

DATA 

F7 ,18, 69 , 06 , 85 , F7 , A9 , 00 , 65 

.20 

512 

DATA 

02 , 60 , A9 ,01, 8D , 52 , 9F , AD , 9F  .100 

428 

DATA 

F8 , 85 , F8 , 1 8 , CA , F0 , 03 , 4C , 95 

.203 

513 

DATA 

9C,85,71 ,AD,A3,9C, 85,72, AD  .151 

429 

DATA 

9A , A0 , 00 , A9 , 00 ,91, 45 , C8 , A9 

.58 

514 

DATA 

A7 , 9C , 85 , F9 , AD , AB , 9C , 85 , FA  .44 

430 

DATA 

80 ,91, 45 , C8 , A9 , 00 ,91, 45 , C8 

.  173 

515 

DATA 

AD , AF , 9C , 85 , 45 , AD , B3 , 9C , 85  .225 

431 

DATA 

A9 , 80 , 91 , 45 , AD , 52 , 9B , A6 , 45 

.72 

516 

DATA 

46 , A0 ,12, B9 , E5 , 9D , 38 , F9 , 79  .80 

432 

DATA 

8E , 52 , 9B , 85 , 45 , AD , 53 , 9B , A6 

.249 

517 

DATA 

9F , 85 , 64 , CB , B9 , E5 , 9D , F9 ,79  .191 

433 

DATA 

46 , 8E , 53 , 9B , 85 , 46 , 68 , A8 , 68 

.24 

518 

DATA 

9F , 85 , 63 , 88 , AD , 52 , 9F , 85 , 62  .44 

434 

DATA 

AA , 68 , 60 , 46 , 00 , 00 , 00 , 00 , 00 

.113 

519 

DATA 

A9, 00, 85, 61 ,20, 00,90, AD, 51  .239 

435 

DATA 

8E , 30 , 00 , 68 , 48 , 8A , 48 , 98 , 48 

.232 

520 

DATA 

9F , 85 , 6A , A9 , 00 , 85 , 69 , 98 , 48  .82 

436 

DATA 

A0 , 05 , B9 , 6A , 9C , 99 , 4C , 9B , 88 

.83 

521 

DATA 

20 , B7 , 90 , 68 , A8 , A5 , 62 , 18,79  .67 

437 

DATA 

1 0 , F7 , 68 , A8 , 68 , AA , 68 , 60 , 48 

.220 

522 

DATA 

79 ,9F ,91 ,F9,C8, A5,61 ,79,79  .48 

438 

DATA 

BA , 48 , 98 , 48 , A5 , 45 , 8D ,71, 9C 

.  101 

523 

DATA 

9F ,91, F9 , C8 , C0 ,18, D0 , BC , A0  .157 

439 

DATA 

A5 , 46 , 8D , 72 , 9C , A0 , 06 , B 1 ,F9 

.240 

524 

DATA 

06 , B9 , F7 , 9D , 38 , F9 , 8B , 9F , 85  .220 

440 

DATA 

18, 79 , 64 , 9C , 99 , 64 , 9C , C8 , B 1 

.  153 

525 

DATA 

64 , C8 , B9 , F7 , 9D , F9 , 8B , 9F , 85  .233 

441 

DATA 

F9 , 79 , 64 , 9C , 99 , 64 , 9C , C8 , C0 

.74 

526 

DATA 

63 , AD , 52 , 9F , 85 , 62 , A9 , 00 , 85  .220 

442 

DATA 

0C,D0,E9,A9,00,8D,54,9B,A0 

.29 

527 

DATA 

61 ,20, 00, 90,88, AD, 51 ,9F, 85  .141 

443 

DATA 

07 , B9 , 64 , 9C , F0 , 3 1 , 88 , B9 , 64 

.  142 

528 

DATA 

6A , A9 , 00 , 85 , 69 , 98 , 48 , 20 , B7  .196 

444 

DATA 

9C , 30 , 1 4 , C8 , 8D , 55 , 9B , B9 , 64 

.91 

529 

DATA 

90 , 68 , A8 , A5 , 62 ,18, 79 , 8B , 9F  .167 

445 

DATA 

9C , 38 , E9 ,01, D0 , 07 , AD , 55 , 9B 

.222 

530 

DATA 

9 1 ,F9 , C8 , A5 ,61 , 79 , 8B , 9F ,91  .126 

446 

DATA 

C9 , 68 , 30 , 1 8 , 88 , 38 , B9 , 64 , 9C 

.  123 

531 

DATA 

F9 , C8 , C0 , 0C , D0 , BC , 20 , 73 , 9C  .235 

447 

DATA 

E9 , 68 , 99 , 64 , 9C , C8 , B9 , 64 , 9C 

.  88 

532 

DATA 

20 , 6C , 9B , AD ,71, 9C , 85 , 45 , AD  .16 

448 

DATA 

E9 ,01, 99 , 64 , 9C , A9 ,01, 8D , 54 

.33 

533 

DATA 

72 , 9C , 85 , 46 , EE , 52 , 9F , AE ,51  .211 

449 

DATA 

9B , C8 , C8 , C0 , 0D , D0 , C4 , AD , 54 

.  104 

534 

DATA 

9F,E8,EC,52,9F,F0,03,4C,2C  .196 

450 

DATA 

9B , D0 , B8 , A0 , 00 , 18 , B1 , F9 , 99 

.223 

535 

DATA 

9E , A5 , 45 , 8D , AF , 9C , A5 , 46 , 8D  .119 

451 

DATA 

63,9C,B1 ,71 ,79 ,63,9C,91 ,F9 

.  44 

536 

DATA 

B3,9C,A0,00,B9,F7,9D,99,BB  .166 

452 

DATA 

C8,B1 ,F9 ,99 ,63,9C,B1 ,71 ,79 

.  143 

537 

DATA 

9F , C8 , C0 , 0C , D0 , F5 , 60 , 20 , B9  .21 

453 

DATA 

63 , 9C , 9 1 , F9 , C8 , C0 , 06 , D0 , E 1 

.76 

538 

DATA 

9F , AD , 53 , 9F , 85 , 45 , AD , 54 , 9F  .46 

454 

DATA 

B1 ,71 ,AA,A5, 71 , 18,69,07,85 

.  191 

539 

DATA 

85 , 46 , 20 , CE , 98 , A9 ,01, 8D , 4E  .23 

455 

DATA 

47, A5, 72, 69, 00 ,85, 48, A0, 00 

.38 

540 

DATA 

99 , A9 , 00 , 8D , 4F , 99 , 20 , EE , 98  .32 
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541  DATA  20,7B,98,20,EE,98,20,7B,98  .25 

146  DATA 

542  DATA  AE,51 ,9F ,A9, A0 , 8D , 3C , 03 , A9  .118 

147  DATA 

543  DATA  00 , BD , 3D , 03 , A9 , 64 , 8D , 3E , 03  .169 

148  DATA 

544  DATA  8A , 48 , 20 , C6 , 99 , AD , 0D , 9A , 85  .54 

149  DATA 

545  DATA  45 , AD , 0E , 9A , 85 , 46 , 20 , 7B , 98  .251 

150  DATA 

546  DATA  20 , EE , 98 , 68 , AA , CA , D0 , D7 , AD  .8 

151  DATA 

547  DATA  AF , 9C , 85 , 45 , AD , B3 , 9C , 85 , 46  .231 

152  DATA 

548  DATA  20 ,C7 , 9F , A2 , 00 , 60 , 46 , 1 A , 6 1  .76 

153  DATA 

549  DATA  30 , 20 , CE , 98 , 20 , EE , 98 , 20 , 7B  .223 

154  DATA 

550  DATA  98 , 20 , EE , 98 , 20 , 97 , 9F , A9 , A0  .200 

155  DATA 

551  DATA  8D , 3C , 03 , A9 , 00 , 8D , 3D , 03 , A9  .9 

156  DATA 

552  DATA  64 , 8D , 3E , 03 , 20 , C6 , 99 , 4C , E3  .220 

157  DATA 

553  DATA  9C , A0 , 00 , A9 , 00 , 99 ,F7 , 9D , 99  .167 

158  DATA 

554  DATA  8B , 9F , C8 , C0 , 0C , D0 , F5 , 4C , D5  .104 

159  DATA 

555  DATA  9F , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00  .105 

160  DATA 

556  DATA  00 , 00 , 00 , 00 , AD , 9F , 9C , 85 , 71  .114 

161  DATA 

557  DATA  AD , A3 , 9C , 85 , 72 , AD , A7 , 9C , 85  .225 

162  DATA 

558  DATA  F9 , AD , AB , 9C , 85 , FA , AD , AF , 9C  .122 

163  DATA 

559  DATA  85 , 45 , AD , B3 , 9C , 85 , 46 , 20 , 6C  .17 

164  DATA 

560  DATA  9B , 60 , A0 , 00 , 78 , B9 , 00 , 00 , 99  .200 

165  DATA 

561  DATA  00 , 04 , C8 , D0 , F7 , 58 , 60 , A0 , 00  .137 

166  DATA 

562  DATA  78 , B9 , 00 , 04 , 99 , 00 , 00 , C8 , D0  .90 

167  DATA 

563  DATA  F7 ,58 , 60 , AD , 53 , 9F , 8D , AF , 9C  .229 

168  DATA 

564  DATA  AD , 54 , 9F , BD , B3 , 9C , 20 , 73 , 9C  .212 

169  DATA 

565  DATA  4C , 88 , 9C , 24 , 48 , 00 , 00 , 00 , 00  .43 

170  DATA 

566  DATA  00,00,00,00,00,47,52,41,46  .186 

171  PATA 

567  DATA  465284  .207 

172  DATA 

173  DATA 

174  DATA 

PROGRAMA i 

GEN. CLIP  LISTADO 

2 

100 

REM  GENERADOR  "CLIP" 

.230 

101 

REM  (0  1987  MARTIN  LEIBBRANDT 

.23 

102 

REM  (0  1987  BY  COMMODORE  WORLD 

.  114 

103 

i 

.79 

104 

A»49152 

.  136 

105 

B-50240 

.57 

106 

FORI- 

ATOB i BOSUB 1 09 i POKE I , V 

.52 

107 

S«S+PEEK(I>  «NEXTiREADT*  IFBOTTH 

.27 

ENPR I NT " t RVSON 3 ERROR  EN  DATAS! 

108 

P0KE43 , 0 s  P0KE44 , 1 92 1 POKE45 , 60 »  P 

.8 

OKE46, 196 iSAVE" CLIP. OBJ " ,8iEND 

109 

V=0  í  READH$ i BOSUB 1 1 0  s  V»V* 1 6 1 H*=M 

.87 

ID*(H*,2> 

110 

X=ASC(H*>  * V=V+X+4B*(X<64)+55*(X 

.  166 

>64) «RETURN 

111 

i 

.87 

112 

DATA 

48 , 8A , 48 , 98 , 48 , A5 , 5F , 45 , 5B 

.220 

1  13 

DATA 

30 ,15, 38 , A5 , 5E , E5 , 5A , A5 , 5F 

.83 

114 

DATA 

E5 , 5B , 90 , 05 , A9 ,01 ,4C,29,C0 

.  134 

1 15 

DATA 

A9 , FF , 4C , 29 , C0 , A5 , 5F , 2A , A9 

.  163 

116 

DATA 

FF , B0 , 02 , A9 , 0 1 ,EA,C9,FF,D0 

.60 

117 

DATA 

20 , A5 , 5E , A6 , 5A , 85 , 5A , 86 , 5E 

.91 

118 

DATA 

AS , 5F , A6 , 5B , 86 , 5F , 85 , 5B , A5 

.  16 

1 19 

DATA 

55 , A6 , 5C , 86 , 55 , 85 , 5C , A5 , 56 

.59 

120 

DATA 

A6 , 5D , 86 , 56 , 85 , 5D , EA , A5 , 5B 

.  128 

121 

DATA 

4D , 33 , C4 , 30 ,17, 38 , A5 , 5A , ED 

.93 

122 

DATA 

32 , C4 , A5 , 5B , ED , 33 , C4 , 90 , 05 

.84 

123 

DATA 

A9 ,01 , 4C , 76 , C0 , A9 ,FF , 4C ,76 

.79 

124 

DATA 

C0 , A5 , 5B , 2A , A9 , FF , B0 , 02 , A9 

.254 

125 

DATA 

01 ,EA,C9,01 ,D0,03,4C,27,C4 

.  167 

126 

DATA 

EA,A5,5F,4D,33,C4,30, 17,38 

.  178 

127 

DATA 

A5 , 3E , ED , 32 , C4 , A5 , 5F , ED , 33 

.75 

128 

DATA 

C4 , 90 , 05 , A9 ,01 ,4C,A6,C0,A9 

.238 

129 

DATA 

FF,4C,A6,C0,A5,5F,2A,A9,FF 

.37 

130 

DATA 

B0 , 02 , A9 ,01, EA , C9 ,01 , F0 , 03 

.  198 

131 

DATA 

4C,2F,C1 ,A5,5C, 85,62, A5,5D 

.111 

132 

DATA 

85,61 ,A5, 55, 85,64, A5, 56, 85 

.24 

133 

DATA 

63,20,78,91 ,A5, 63, 8D,3A,C4 

.  155 

134 

DATA 

A5 , 64 , 8D , 3B , C4 , AD , 32 , C4 , 85 

.74 

135 

DATA 

64 , AD , 33 , C4 , 85 , 63 , A5 , 5A , 85 

.241 

136 

DATA 

62, A5,5B, 85, 61 ,20,78,91 , AD 

.  106 

137 

DATA 

3A ,C4 , 85 ,61 , AD , 3B , C4 , 85 , 62 

.  173 

138 

DATA 

20 , 00 , 90 , 38 , A5 , 5A , E5 , 5E , 85 

.64 

139 

DATA 

6A , A5 , 5B , E5 , 5F , 85 , 69 , 20 , B7 

.77 

140 

DATA 

90 , A5 ,61, 85 , 63 , A5 , 62 , 85 , 64 

.  150 

141 

DATA 

A5, 55, 85, 62, A5, 56, 85, 61 ,20 

.  175 

142 

DATA 

78,91 ,AD,3A,C4, 85,61 ,AD,3B 

.  170 

143 

DATA 

C4 , 85 , 62 , 20 , 6A ,91, A5 , 63 , 85 

.245 

144 

DATA 

56 , A5 , 64 , 85 , 55 , AD , 32 , C4 , 85 

.  168 

145 

DATA 

5E , AD , 33 , C4 , 85 , 5F , EA , A5 , 5B 

.  197 

177  DATA 

178  DATA 

179  DATA 

180  DATA 

181  DATA 

182  DATA 

183  DATA 

184  DATA 

185  DATA 

186  DATA 

187  DATA 

188  DATA 

189  DATA 

190  DATA 

191  DATA 

192  DATA 

193  DATA 

194  DATA 

195  DATA 

196  DATA 

197  DATA 

198  DATA 

199  DATA 

200  DATA 

201  DATA 

202  DATA 

203  DATA 

204  DATA 

205  DATA 

206  DATA 

207  DATA 

208  DATA 

209  DATA 

210  DATA 

211  DATA 

212  DATA 

213  DATA 

214  DATA 

215  DATA 

216  DATA 

217  DATA 

218  DATA 

219  DATA 

220  DATA 

221  DATA 

222  DATA 

223  DATA 

224  DATA 

225  DATA 

226  DATA 

227  DATA  63 

228  DATA 

229  DATA 

230  DATA 
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231  DATA  AA , 68 , 60 , 3F ,01, C7 , 00 , 00 , 00  .31 

232  DATA  00,00,00,00,00,00,00,00,00  .124 

233  DATA  133996  .59 


PROGRAMA*  TURBOGRAFIK  LISTADO  3 

10  REM  TURBOGRAFIK  -  ANIMACION  3D  .6 
50  REM  (0  1987  BY  MARTIN  LEIBBRANDT  .146 
90  REM  (C) 1907  BY  COMMODORE  NORLD  . 102 
103  :  .79 

131  IFL-1THEN170  .127 

132  P0KE2 , 1  -92 

140  IFA-0THENA-1* LOAD "TURBOGRAFIK. O  .206 

B  J  "  ,  8 , 1 

150  IFA— 1THENA— 2*  LOAD"CLIP. OBJ " ,8, 1  .32 

151  P0KE56 , 48 1  CLR  *  LO—  1  .7 

160  DIML'/.(50)  .4 


170  W1-40103*W2=40107*F1=40095;F2=4  .194 
0099*  B 1-401 1 1  *  B2-401 15*  A 1-40785*  AN- 

0*  SA— 1 

171  MOV I E-40457 : SHOW— 40687 : AGA I N—40  .205 
789*  CLEAR— 40825 


172  B3-407B7  *  B4— 40788  .146 

173  1FL-1THEN5120  .105 

180  GOSUB 10000  .162 

190  PR I NT " C CLR  3  "  ;  .130 

210  PR I NTSPC ( 9 ) "  C  RVSON 3  C  2 1 SPC 3 "  .226 

220  PRINTSPCÍ9) " CRVS0N3 C4SPC3MENU  P  .28 
R I NC I PAL  C  3SPC  3 " 

230  PR I NTSPC ( 9 ) "  C  RVSON 3  C  2 1 SPC 3 "  .246 

250  PR I  NT  "  C  2CRSRD 3 C 1 4SPC 3 OPC I ONES " *  .126 
PRINT 

260  PR I NT " C CRSRD 3 C 8SPC 3 1  -  POSICION  .231 
AR  OBJETO" 

270  PR I NT " C  CRSRD I C  BSPC 3 2  -  CREAR  PE  .133 
LIGULA" 

280  PRINT" CCRSRD3C8SPC33  -  VISUALIZ  .67 
AR  PELICULA" 

290  PR I NT " C  CRSRD  3  C BSPC 3 4  -  GRABAR  O  .163 


BJETO" 

300  PR I NT " C  CRSRD 1 C  8SPC 3 5  -  CARGAR  O  .89 
BJETO" 

301  PR I NT " C  CRSRD  3  C  8SPC  3  6  -  GRABAR  P  .24 
ELICULA" 

302  PRINT" CCRSRD3C8SPC37  -  FIN  DE  P  .61 
ROGRAMA" 


310  GET A*  *  I FA$< " 1 " ORA*  > " 7 " THEN3 1 0  .51 

311  EN-0  .242 

320  ONVAL ( A* ) GOSUB 1 000 , 2000 , 3000 ,40  .177 

00 , 5000 , 8000 , 7000 

321  I FEN- 1 THEN340  .80 

330  GOTO 190  .149 

340  END  . 87 

1000  PR I NT " C  CLR  3  C  CRSRD  3  C 2SPC  3  C  RVSON  .47 

3  POSICIONAR  OBJETO  " 

1060  PRINT" CCRSRD3C2SPC31  -  COMENZA  .156 


R  DE  NUEVO" 

1070  PR I NT " C CRSRD 3  C 2SPC 1 2  -  CONTINU  .32 
AR" 

1080  PR I NT " C CRSRD 3  C 2SPC I C FLCH  IZQ3  .108 
-  MENU" 

1 090  GET  A*  s I FA*<  > " 1 " ANDA*<  > " 2 " ANDA*  . 4 
O"  CFLCH  I ZQ3  "THEN1090 

1091  IF A*- "CFLCH  I ZQ 3 " THENRETURN  .251 

1100  I F A*— " 1 " ANDS A— 1 THEN AN— 0  s  S  A-0 : S  .20 
YSCLEAR* A#-" CFLCH  IZQ3" 

1101  IFA*—" 1 " ANDSA— 0ANDLO— 1THENAN— 0  .225 
s  SA=0  s  GOSUB 10140*  SYSCLEAR 

1102  IFA*-"1"ANDSA-0ANDLO=0THENGOTO  .38 
1000 

1110  I  FA$- "  2  "  ANDS A=  1 THENSA— 0  s  SYSCLE  .180 
AR 

1120  I FA*— " 2 " ANDSA— 0THENSYSAGA I N  .32 

1121.  POKE198,0  .13 

1130  RETURN  .168 

2000  PR I NT " C  CLR  3  C  CRSRD  3  C  2SPC  3  C  RVSON  .33 
3  CREAR  PELICULA  " 

2060  PRINT" CCRSRD3  NUMERO  DE  DIBUJO  .162 
S"; 

2070  INPUTAI*  .86 


2071  IFAIt— " CFLCH  IZQ 3 "THENRETURN  .227 

2072  AI-VAL (Alt)  .52 

2080  I FAN+A I >255THEN2000  .54 

208 1  F6-PEEK ( 1 2294 ) *  RR-PEEK ( F 1 ) +PEE  . 239 

K (F2) *256*  TT-PEEK (W1 ) +PEEK (W2>  *256 

2082  PP— ( (TT-RR) — 7-FG) /6  .210 

2083  EE— ( (AN+AI ) * ( (PP+1 ) *4+4* (FG+1 >  .125 
+4) >+1+10 

2084  I FEE  >24576THEN2060  . 62 

2090  POKE A 1 , A I  .40 

2100  SYSMOVIE  .210 

2110  AN-AN+AI  .208 

2120  RETURN  .138 


3000  PR I NT " C  CLR  3  C  CRSRD  3  C  2SPC  3  C  RVSON  .61 
3 VISUALIZAR  PELICULA" 

3070  PRINT" CCRSRD3C28PC31  -  COMENZA  .155 
R" 

3080  PR I NT " C CRSRD 3  C 2SPC 3  C FLCH  IZQ3  .118 
-  VOLVER  AL  MENU" 

3090  GETAts  IFA*<>"1"  ANDA*<>"  CFLCH  I  .134 
ZQ3 "THEN3090 


3100  IFA*-" CFLCH  I ZQ 3 "THENRETURN  .220 

3101  I FAN< 1 THENPR I NT " C  CRSRD  3  C  2SPC  3  N  .131 
O  HAY  PELICULA"* WAIT198, 1:POKE198,0 

s  RETURN 

3109  POKE A 1 , AN  .171 

3110  SYSSHOW  .138 

3111  GETAt* IFA*— " "THEN31 1 1  .233 

3112  SYS39134  .232 

3120  RETURN  .118 

4000  PR I NT " C  CLR  3  C  CRSRD  3  C  2SPC  3  C  RVSON  .113 
3  GRABAR  OBJETO  " 

4060  PRINT" C CRSRD 3  NOMBRE  FICHERO";  .217 
4070  INPUTFI*  .85 

4080  I FF I *— " ♦ " THENGOSUB6000 : GOTÜ500  .227 
0 

4081  IFFI*-" CFLCH  I ZQ 3 "THENRETURN  .236 

4090  0PEN1 ,8, 1 ,FI*+".OB,P,W"  .153 

4100  0PEN15 , 8,15: INPUT#15 , A: IFA<  >0T  .148 
HENCL0SE1 s  CL0SE15: GOTO4000 

4110  PR I NT #  1 , CHR* ( 0 ) ; CHR* ( 48 ) ;  .28 

4120  FOR I — 1 2288T0S I  .216 

4130  PRINT#1 ,CHR* (PEEK(I) ) ;  .160 

4140  NEXTI  . 144 

4150  PR I NT #  1  *  CLOSE 1  .54 

4160  I NPUT #15, A: IFA<  >0THENOPEN 1,8,1  .98 
5 , " S  * " +F I *  s CLOSE 1  *  CLOSE 1 5  *  GOTO4000 
4170  CLOSE 15  .186 

4180  OPEN 1 , 8 , 1 , F I *+ " . DA , P , W "  .110 


4190  PR I NT # 1 , PEEK (MI): PR I NT # 1 , PEEK (  .202 
W2) *PRINT#1 , PEEK ( F 1 ) 

4200  PR I NT # 1 , PEEK ( F2 ) s  PR I NT # 1 , PEEK (  .48 
B 1 ) s  PR I NT  # 1 , PEEK ( B2 ) 

4210  PRINTK1, PEEK (B3) s PRINT#1 , PEEK (  .146 
B4) 

4220  PR I NT# 1 s  CLOSE 1 : RETURN  . 40 

5000  PR I NT " C  CLR  3  C  2SPC  3  C  RVSON  3  CARGA  .83 
R  OBJETO  " 

5060  PR I NT " C CRSRD 3  NOMBRE  FICHERO"  .93 
5070  INPUTFI*  .65 

5080  I FF I ♦ " THENGOSUB6000 : GOTO500  .207 

0 

5081  IFFIt-" CFLCH  I ZQ 3 "THENRETURN  .216 

5082  0PEN2 , 8 , 0 , F I $+ " . OB , P , R "  .181 

5090  0PEN1  ,8, 15*  INPUT#1  ,A:  IFAO0THE  .143 
NCL0SE1 * CL0SE2* GOTO5000 

5100  CL0SE2* CLOSE 1  .23 

5110  L= 1 : LOADF I $+ " . OB " , 8 , 1  .199 

5120  OPEN 1 , 8 , 2 , F I t+ " . DA , P , R "  .80 

5130  I NPUT # 1 , A : POKEW 1 , A : I NPUT # 1 , A : P  .208 
0KEW2 , A 

5140  I NPUT # 1 , A : POKEF 1 , A  s I NPUT # 1 , A : P  .64 
0KEF2 , A 

5150  I NPUT # 1 , A : POKEB 1 , A  *  I NPUT # 1 , A  s  P  .38 
0KEB2, A 

5160  I NPUT # 1 , A  *  P0KEB3 , A  *  I NPUT #1 , A  *  P  .84 


0KEB4 , A 

5170  CLOSE 1  .82 

5171  LO=0  .37 

5180  GOTO190  .154 

6000  PRINT" CCLR3 " ;  .75 

6010  CLOSE 1 5  *  CL0SE2  .123 

6020  OPEN 15,8,15f"I": 0PEN2 ,8,2,"#"  .231 

6021  IFAt=" CSHIFTG3 "THEN6100  .182 

6030  VI  — 18s  V2— 1  .21 
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6040  PRINT#15, "U1";2;0;V1; V2: PRINT#  .51 
15 , "B-P" } 2; 0 

6050  GET#2,X$: V1=ASC(XS+CHR*(0) )  .25 

6060  GET#2, X*: V2=ASC ( X$+CHR* (0) )  .39 

6070  FORX=0TO7 :  PRINT#  15,  "B-P"  j  2;  X*3  .123 
2+2 

6080  GET#2,X*: IFX$=" "THEN6150  .217 

6090  PRINT#15, "B-P" ;2; X*32+5: FF*=" "  .167 
:FÜRY=0TQ15 

6100  GET#2, X*s IFASC ( X$+CHR$ (0) ) =160  .137 
THEN61 30 

6110  FF*=FF*+X*  .141 

6120  NEXTY  .211 

6130  IFR=0THENR=1 : PRINTFF*;  x  GÜTÜ615  .181 
0 

6140  R=0* PRINTTAB (20) ; FF*  .189 

6150  NEXTX: IFV1< >0THEN6040  .212 

6160  CL0SE2xCL0SE15: PRINT: PRINT: PRI  .248 
NTSPC (10)"  PULSA  ESPAC I ü " 

6170  GETA* : I FA*= " " THEN6 170  .74 

6180  RETURN  .118 


7000  PR I NT " C CLR 3  C  CRSRD 3  C  2SPC 3  C RVSON  .131 
3  FIN  PROGRAMA  " 

7070  PRINT"  1  -  SALIR  DEL  PROGRAMA"  .13 
7080  PRINT"  CFLCH  IZQ3  -  VOLVER  AL  .47 
MENU" 

7090  GETA*:  IFA*<>"1  "ANDADO"  CFLCH  I  .55 
Z  Q  3 " THEN7 090 


7100  IFA*=" CFLCH  I ZQ 3 " THENRETURN  .139 
7200  EN=1* RETURN  .236 

8000  PR I NT " C  CLR  3  C  2SPC  3  C  RVSON  3  GRABA  .101 
R  PELICULA  " 

8060  PR I NT " C CRSRD 3  NOMBRE  FICHERO"  .33 
8070  INPUTFI $  .5 

8080  I FF I *= " * " THENGQSUB6000 : GOTO800  . 1 59 

0 

8081  I FF I ♦= " C FLCH  I ZQ 3 "THENRETURN  .156 

8082  1 FAN< 1 THENPR I NT " C  CRSRD  3  C  2SPC 3  N  .11 
O  HAY  PELICULA" : WAIT198, 1:POKE198,0 

s RETURN 

8083  AA=PEEK ( B3 ) +PEEK ( B4 ) *256  .186 

8084  FG=PEEK ( 1 2294 ) : RR=PEEK ( F 1 ) +PEE  .121 
K (F2) *256: TT=PEEK (W1 ) +PEEK ( W2) *256 

8085  PP= ( (TT-RR) — 7-FG) /6  .92 


8088  EE=AA+ ( ( AN) *  <PP*4+4*FG+4 ) ) +1  +  1  .93 

0 

8089  0PEN15,8, 15: 0PEN2 , 8 , 2 , FI*+" . FI  .18 
L,P,W" 

8090  INPUT#15,A,B*,C,D:  IFAO0THENCL  .131 
0SE15:CL0SE2:PRINTB$; : WAIT198, 1 : POK 


El 98 ,0: GOTO8000 

8092  PR I NT #2 , CHR* ( 0 ) ; CHR* ( 48 ) ;  .193 

8100  F0RI=12288T0EE:PRINT#2,CHR*(PE  .75 
EK ( I ) ) ; : NEXTI 

8110  PR I NT #2 : CLQSE2  .5 

8120  INPUT#15 , A , B* , C , D: IFA< >0THENPR  .231 
INT#15,"S: " +F I ♦+ " . F I L " : CLOSE 1 5 : GOT O 
8000 

8130  0PEN2,B,2,FI*+".FDA,P,W"  .171 

8140  PR I NT #2 , AN : PR I NT #2 , PEEK ( B3 ) : PR  .3 
I NT  #2 , PEEK ( B4 ) 

8150  PRINT#2  .233 

8160  CL0SE2  .19 

8170  RETURN  .67 

10000  REM  INICIALIZACION  .215 

10050  POKE53280 , 0 : P0KE5328 1,0  .237 


10060  PR I NT " C  CLR  3  C  GRN 3  C  CRSRD  3  LEYEN  .157 
DO  DATOS,  ESPERA..."; 

10140  1=1 2288: FORA=0TO5: POKEI+A , 0: N  .89 
EXTA: A=1:B=1: 1=1+6: PP=0: RESTORE 
10150  READC : I FC  >- 1 000THENB=B+ 1 : GOTO  . 239 
10150+E 


10160  LX (A) =B/3: A=A+1 : B=1  .39 

10170  READC : I FC  >- 1 000THEN 10150  . 223 

10171  RESTORE: FG=A  .126 

10172  POKEI ,A-1* 1=1+1  .167 

10180  FORC=lTOA— 1 i POKEI , LX (C) : 1=1+1  .129 

10190  FORD=lTOLX(C)  .141 

10191  RE ADE : I FE< 0THENE=65535+E  . 64 

10200  F=INT (E/256) :G=INT(E-F*256)  .63 

10210  POKEI ,G: 1=1+1 i POKEI ,F« 1=1+1 : P  .177 

P=PP+1 

10220  READE  .91 

10230  I FE  >0THENE=65535— E  .37 

10240  I FE<  0THENE=— E  .110 


10250 

F=INT (E/256) :G=INT(E-F*256) 

.  114 

10260 

POKEI , G: 1=1+1: POKE I , F : 1=1+1 

.226 

10261 

READE: IFE<0THENE=65535+E 

.  135 

10270 

F= I NT ( E / 256 ) «  G= I NT ( E-F*256 ) 

.  134 

10280 

POKEI , G: 1  =  1  +  1  * POKEI ,F: 1  =  1  +  1 

.246 

10290 

NEXTD: READE: NEXTC: READE 

.  10 

10291 

A=INT (1/256) : B=INT ( I— A*256) 

.  199 

10300 

POKEW 1 , B : P0KEW2 , A 

.72 

10310 

POKEF 1,0: PQKEF2 , 48 

.92 

10320 

FORA=0TO1 1: POKEI+A, 0:NEXT 

.0 

1 0330  1  =  1  +  12*  FOR A=0TO5STEP2  *  POKE I + A 
, l:POKEI+A+l , 0: NEXTA 

.80 

10340 

TA 

1  =  1+6: FORA=0TQ5 *  POKE I + A , 0 : NE  X 

.  12 

10350 

1  =  1+6 

.202 

10351  F0RA=1T02: READE: G=INT (E/256) : 
F=INT(E-G*256) 

.33 

10352 

POKEI ,F: POKEI +1 ,G: 1=1+2: NEXTA 

.220 

10360 

A= I NT ( I / 256 ) : B= I NT ( I - A*256 ) 

.  12 

10370  POKEBl , B  * POKEB2 , A : P0KEB3 , B : PO 
KEB4 , A: S I = I 

.254 

10380 

RETURN 

.238 

20000 

REM  COORDENADAS  DE  LOS  PUNTOS 

.  130 

20010 

DATA— 40 ,0,0 

.234 

20020 

DAT  A-40 , 20 , 0 

.  178 

20030 

DAT  A— 30 , 20 , 0 

-  172 

20040 

DATA-30, 10,0 

.52 

20050 

DATA-40, 10,0 

.78 

20060 

DATA-30 ,0,0 

.  12 

20070 

DATA- 1000 

.  106 

20080 

DAT A-l 0,20,0 

.  190 

20090 

DAT A- 10, 0,0 

.  10 

20100 

DAT A0 ,0,0 

.78 

20110 

DATA0 , 20 , 0 

.  198 

20120 

DATA- 1000 

.  156 

20130 

DATA20 ,0,0 

.  108 

20140 

DAT A20, 20,0 

.84 

20150 

DATA30 ,0,0 

.  136 

20160 

DATA30 , 20 , 0 

.112 

20170 

DATA  -1000 

.206 

20180 

DATA  -1000 

.216 

20200 

REM  PUNTO  DE  VISTA 

.86 

20210 

DATA1000 , 50 

.  154 

PROGRAMA:  VIDEOTAPE  LISTADO  4 

100 

P0KE56 ,41: P0KE2 , 1 

.  164 

110 

REM  VIDEOTAPE 

.  182 

120 

REM  PARA  " TURBOGRAF I K " 

.  122 

130 

y 

REM  (0  1987  BY  MARTIN  LEIBBRAND 

.226 

140 

REM  (C) 1987  BY  COMMODORE  WORLD 

.  152 

150 

: 

.  126 

160 

IFLO=1THEN270 

.250 

170 

I F AA=0THENAA= 1 : LOAD " TURBOGRAF I K 

.46 

. OBJ " , 8 , 1 

180 

I F AA= 1 THENAA=2 *  LOAD "CLIP. OBJ " , 8 

.30 

*  1 
190 

POKE53280 , 0 : P0KE532B 1 , 0 

.66 

200 

Al=40785*  MOV I E=40687 : B3=40787: B 

.  124 

4=40788 

210 

PR I NT " C  CLR I C  GRN 1 C  2SPC 1 C  RVSON 1  V 

.44 

IDEOTAPE  CRVSOFF 3  -  VISUALIZAR  PELI 
GULAS" 

220 

I NPUT " C  CRSRD 1  NOMBRE  DEL  FICHER 

co 

0";FI* 

230 

0PEN2 , 8 , 0 , F I *+ " .FIL,P,R"x  OPEN 1 , 

.  136 

8,15: INPUT#1,A,B*,C,D 

240 

IFA< >0THENCLOSE2: CLOSE 1 : GOTO 190 

.92 

250 

CL0SE2: CLOSE 1 

.  18 

260 

L0= 1 1 LOADF I *+ ".FIL",8,1 

.33 

270 

0PEN2 , 8 , 0 , F I *+ " . FDA , P , R " 

.55 

280 

INPUT#2, A: INPUT#2,Bx INPUT#2,C 

.25 

290 

P0KEB3 , B  *  P0KEB4 , C : POKE A 1 , A 

.219 

300 

CL0SE2 

.65 

310 

PRINT" C CRSRD 1  PULSE  UNA  TECLA" 

.  179 

320 

GETA*: IFA*=" "THEN320 

.  133 

330 

SYSMOVIE 

.225 

340 

POKE 198,0 

.253 

350 

GETA*: IFA*=" "THEN350 

.  101 
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360  8YS39 1 34 t PR I NT " t CLR  D " |  .57 

370  PRI NT "REPETIR  (S/N)7"  .177 

380  BETA* « I F  A*<  > " 8 " ANDA*<  >"N" THEN38  . 43 

0 

390  IFA**"B"THENPRINT"  CCLRD  "  j  *  G0TÜ2  .49 
90 

400  GOTO190  .219 


PROGRAMA*  LOGO  LISTADO 

20000  REM  COORDENADAS  DE  LOS  PUNTOS 
20010  DATA  0,14,0,14,14,0,14,0,0,0, 
0,0,0,14,0 

20020  DATA  -1000,2,12,4,12,12,4,12, 
2,4,2,2,4,2,12 

20030  DATA  4,-1000,0,14,0,2,12,4,-1 
000,14,14,0, 12,12,4 

20040  DATA  -1000,14,0,0,12,2,4,-100 
0,0,0,0,4,2,2,-1000 

20050  DATA  18,14,0,32,14,0,32,0,0,1 
8,0,0, 18,14,0 

20060  DATA  -1000,20,12,4,30,12,4,30 
,2,4,20,2,4,20,12 

20070  DATA  4,-1000,18,14,0,20,12,4, 
-1000,32,14,0,30,12,4 
20080  DATA  -1000,32,0,0,30,2,4,-100 
0,18,0,0,22,2,2,-1000 
20090  DATA  36,14,0,50,14,0,50,0,0,3 


6,0,0,36,14,0 

20100  DATA  -1000,38,12,4,48,12,4,48 
,2,4,38,2,4,38,12 

20110  DATA  4,-1000,36,14,0,38,12,4, 

-1000,50,14,0,48,12,4 

20120  DATA  -1000,50,0,0,48,2,4,-100 

0,36,0,0,40,2,2,-1 000 

20130  DATA  54,14,0,68,14,0,68,0,0,5 

4,0,0,54,14,0 

20140  DATA  -1000,56,12,4,66,12,4,66 
,2,4, 56 ,2,4, 56 ,12 

20150  DATA  4,-1000,54,14,0,56,12,4, 

-1000,68,14,0,66,12,4 

20160  DATA  -1000,68,0,0,66,2,4,-100 

0,54,0,0,58,2,2,-1000 

20170  DATA  72,14,0,86,14,0,86,0,0,7 

2,0,0,72,14,0 

20180  DATA  -1000,74,12,4,84,12,4,84 
,2,4,74,2,4,74,12 

20190  DATA  4,-1000,72,14,0,74,12,4, 

-1000,86, 14,0,84,12,4 

20200  DATA  -1000,86,0,0,84,2,4,-100 

0,72,0,0,76,2,2,-1 000 

20210  DATA  0,32,0,86,32,0,86,18,0,0 

, 18,0,0,32,0,-1000 

20220  DATA  2,30,4,84,30,4,84,20,4,2 
,20,4,2,30,4,-1000 

20230  DATA  0,32,0,2,30,4,-1000,86,3 
2,0,84,30,4,-1000 

20240  DATA  86,18,0,84,20,4,-1000,0, 
18,0,2,20,4,-1000,-1000 
20250  REM  PUNTO  DE  VISTA 
20260  DATA  1000,50 


Estamos  preparando  dos  discos  especiales  con  los  mejores  programas 

que  podáis  imaginar. 

Cada  disco  contendrá  un  tipo  de  programas  diferente.  Uno  estará  dedicado 

a  las  APLICACIONES  y  otro  a  JUEGOS 

El  contenido  de  estos  discos  será  descrito  con  más  detalle  en  el  próximo  número. 
ATENTOS  A  LA  INFORMACION  QUE  APARECERA  EN  NUESTRAS  PAGINAS 
Si  quieres  completar  tu  programoteca  aprovecha  la  gran 

SUPER  OFERTA  DE  DISCOS  ESPECIALES 
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J  U  E  G 


ALIENS 

Fabricante:  Electric  Dreams 


Aliens  es  un  juego  muy 
curioso.  Por  un  lado,  es 
una  adaptación  de  una 
película,  y  por  otro  es  una 
segunda  parte.  Aunque  en¬ 
gendros  como  este  no  suelen  salir  nada 
bien.  Aliens  resulta  ser  un  juego  muy 
entretenido,  con  una  gran  dosis  de  estra¬ 
tegia  y  también  de  acción.  Supera  con 
creces  a  Alien,  la  primera  parte,  cuya 
conversión  a  Commodore  no  fue  todo  lo 
buena  que  cabría  esperar. 

FI  escenario  del  juego  es  una  base  de 
colonos  situado  en  el  sistema  4-26,  un 
planeta  poco  explorado  en  el  que  los 
terrestres  han  instalado  convertidores 
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man  (el  jefe  de  los  marines),  Bishop,  un 
androide,  Vasquez,  una  “Rambo”  del 
espacio,  Hicks,  un  valiente  cabo  y 
Burke,  hombre  de  la  compañía.  Aunque 
en  la  película  cada  uno  tiene  sus  propias 
características,  en  el  juego  son  todos 
iguales.  Cada  uno  lleva  su  propia  arma  y 
munición  y  también  cámaras  en  los  cas¬ 
cos,  que  te  informan  de  lo  que  están 
viendo.  Puedes  cambiar  de  uno  a  otro, 
pulsando  la  tecla  que  lleva  su  inicial  y 
también  puedes  ver  su  estado  físico, 
dónde  se  encuentran  y  si  tienen  Aliens 
cerca. 

El  complejo  de  la  base  está  formado 
por  (¡ejem!)  sólo  255  habitantes.  Fn  el 


pero  tendrás  que  hacerlo  con  certeza.  La 
munición  que  tienes  es  realmente  poca, 
pero  puedes  repostar  en  la  armería 
cuanto  quieras. 

Hay  dos  tipos  de  Aliens,  los  “grandes” 
que  se  pasean  andando  por  ahí  y  las 
“larvas”  o  Aliens  pequeños,  que  van 
arrastrándose  por  el  suelo.  Los  Aliens 
adultos  acaban  con  las  personas  en 
segundos,  y  la  única  forma  de  evitarlo  es 
acribillándolos  con  los  fusiles.  Las  habi¬ 
taciones  por  donde  pasan  quedan 
cubiertas  de  “vegetación  biomecánica”  y 
si  no  la  destruyes  crecen  Aliens  al  poco 
tiempo. 

Los  gráficos  de  este  juego  están  muy 
bien,  sobre  todo  en  el  aspecto  anima¬ 
ción.  Las  explosiones  y  movimientos  de 
los  Aliens  son  muy  reales.  El  del  sonido 
es  un  poco  peor,  dado  que  no  hay 
música,  y  los  efectos  sonoros  están  con- 


tn  la  pantalla  aparece  la  imagen  del  personaje ,  lo  que  esta  viendo  y 


sus  Junciones  vitales,  también  puedes  ver  lo  que  les  pasa  a  los  demas. 


cr,m 

r..=.=n 


atmosféricos,  para  hacer  habitable  el 
planeta.  La  oficial  Ripley,  protagonista 
de  la  primera  película,  ha  pasado  un 
montón  de  años  en  el  espacio  tras  su 
primera  aventura  a  bordo  del  Nostromo 
de  la  que  milagrosamente  consiguió 
escapar.  Cuando  llega  a  la  Tierra  y  noti¬ 
fica  la  presencia  de  los  Aliens,  es  dema¬ 
siado  tarde:  se  ha  perdido  el  contacto 
con  la  base.  La  aventura  lleva  a  Ripley  y 
a  un  grupo  de  marines  espaciales  de 
nuevo  al  sistema  4-26,  para  rescatar  a 
los  supervivientes  (si  queda  alguno)  y 
destruir  a  los  Aliens. 

Los  protagonistas  del  juego  son  seis,  y 
tú  los  controlas  a  todos:  Ripley.  Gor- 


manual  de  instrucciones  hay  un  deta¬ 
llado  mapa  con  la  situación  y  las  habita¬ 
ciones  especiales  que  hay.  Estas  son:  la 
armería,  la  sala  de  control,  el  laborato¬ 
rio  médico,  la  sala  del  generador  y  la 
habitación  donde  se  encuentra  la  “reina” 
de  los  Aliens.  Si  no  sabes  utilizar  el 
mapa,  te  servirá  de  poco.  El  objetivo  del 
juego  es  atravesar  el  complejo  y  llegar  a 
la  sala  donde  se  encuentra  la  “reina 
Alien”,  destruirla,  junto  con  los  “hue¬ 
vos”  que  haya  puesto  y  escapar  de  la 
base.  Para  ello  tienes  que  destruir  un 
montón  de  monstruos  por  el  camino, 
que  te  atacarán  en  oleadas.  Para  des¬ 
truirlos  basta  con  disparar  contra  ellos, 


tados.  Sin  embargo,  en  el  aspecto  estra¬ 
tégico  este  es  un  juego  magnífico.  Tener 
que  dirigir  a  seis  personas  a  la  vez  no  es 
nada  fácil.  Puedes  llevarlos  en  grupo, 
haciendo  que  uno  se  adelante  para 
explorar  y  dejando  a  otro  en  la  reta¬ 
guardia,  para  que  no  pillen  a  nadie  por 
sorpresa.  También  puedes  intentar  ata¬ 
ques  “suicidas”  para  llegar  a  los  lugares 
claves.  Si  te  enfrascas  con  el  programa 
llegas  a  pasar  miedo,  sobre  todo  cuando 
los  Aliens  llegan  a  la  sala  del  generador 
y  se  apagan  todas  las  luces.  Disparar 
contra  sombras  gigantes  que  te  rodean 
no  es  nada  fácil  cuando  tu  vida  está  en 
peligro.  ■ 
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JUEGOS 


FLASH  GORDON 

Fabricante:  Mastertronic 


Flash  Gordon,  legendario  hé¬ 
roe  de  los  cómics,  cuyas 
aventuras,  dibujadas  por  Alex 
Raymod,  seguimos  los  menos 
jóvenes  cuando  éramos  tier¬ 
nos  infantes,  ha  sido  llevado  por  fin  al 
mundo  de  los  videojuegos.  Hace  bas¬ 
tante  que  sucedió  lo  mismo  con  un  con¬ 
temporáneo  suyo,  Buck  Rogers,  pero 
este  otro  juego  no  tenía  nada  que  ver 
con  el  personaje  de  los  cómics.  Ahora 


aparece  Flash,  de  la  mano  de  Master¬ 
tronic,  una  casa  que  se  caracteriza  por 
vender  sus  juegos  a  precios  super-bajos 
(“cheapos”  les  llaman  los  ingleses,  algo 
así  como  “baratijas”),  en  un  juego  que 
ofrece  más  calidad  de  la  que  podría 
parecer  por  su  bajo  precio. 

Como  dice  en  las  instrucciones,  es  un 
mega-juego/ multiparte  (¡toma  ya!),  pero 
me  parece  un  poco  exagerado.  El  juego 
se  compone  de  tres  partes,  algo  bastante 


habitual  en  los  juegos  de  hoy  día.  Cada 
una  es  completamente  diferente  de  la 
anterior,  pero  tienes  que  acabar  las  pri¬ 
meras  para  poder  llegar  al  final.  El  obje¬ 
tivo  es  evitar  la  destrucción  del  mundo, 
que  como  siempre  es  el  único  pensa¬ 
miento  del  malvado  Ming.  Tienes  vein¬ 
ticuatro  horas  para  llevar  a  cabo  esta 
hazaña.  No  es  un  mal  sistema  de  pun¬ 
tuación,  porque  te  permite  jugar  mucho 
si  consigues  que  no  te  maten  demasiado 
(cada  vez  que  mueres  pierdes  dos  o  tres 
horas). 

La  primera  de  las  tres  partes  consiste 
en  la  búsqueda  del  príncipe  Barin  en  la 
jungla  de  Arbórea.  Necesitas  su  ayuda, 
de  modo  que  tienes  que  enfrentarte  a 
todo  tipo  de  bichos  y  monstruos  galácti¬ 
cos  que  en  la  jungla  habitan.  Para 
defenderte  no  tienes  nada  más  que  una 
pistola  láser,  aparte  de  tus  habilidades 
luchadoras,  claro.  Un  mapa  en  la  parte 
inferior  de  la  pantalla  te  servirá  de  guía, 
pero  tendrás  que  descifrarlo.  En  el  bos¬ 
que  hay  monstruos,  acantilados,  cami¬ 
nos  y  flechas  indicadoras.  Es  difícil 
encontrar  la  guarida  de  Barin,  sobre 
todo  porque  las  municiones  de  la  pistola 
láser  son  pocas  (aunque  puedes  recoger 
más  por  el  camino)  y  los  monstruos 
muchos.  Hacer  un  mapa  es  especial¬ 
mente  importante  en  esta  fase  del  juego. 

El  aspecto  gráfico  está  muy  bien  cui¬ 
dado,  al  igual  que  en  las  otras  fases.  La 
animación  es  normal,  ni  muy  buena  ni 
muy  mala  y  lo  mismo  puede  decirse  del 
sonido.  Los  gráficos  de  la  jungla,  de 
Flash  y  de  los  monstruos  están  muy  bien 
realizados. 

Cuando  encuentras  a  Barin  (esto  es  ya 
la  segunda  fase),  tienes  que  luchar  con  él 
para  ganarte  su  respeto  y  confianza, 
como  hiciera  Robin  Hood  en  su  día  con 
Little  John.  Es  un  combate  mano  a 
mano,  y  sólo  podrás  utilizar  la  fuerza 
bruta.  Esta  parte  del  juego  es  casi  igual 
que  cualquier  otro  juego  de  kárate. 
Tendrás  que  completarla  si  quieres 
alcanzar  a  Ming. 

Si  has  conseguido  llegar  a  la  última 
fase  es  que  eres  un  buen  jugador.  Ahora 
te  enfrentarás  a  Ming  en  una  carrera  de 
la  muerte,  en  motos  espaciales.  Tienes 
que  perseguirle  a  través  de  un  fantástico 
circuito,  a  la  vez  que  esquivas  a  sus 
guardias,  a  las  minas  espaciales  que  va 
lanzando  y  repostas  energía  pasando  a 
través  de  unas  puertas-energéticas.  Si 
alcanzas  a  Ming,  ¡habrás  salvado  al 
mundo!  ■ 


Para  enfrentarse  a  los  monstruos  Nash  puede  utilizar  la  pistola ,  aunque  algunos  puede  des¬ 
truirlos  a  patadas  o  puñetazos. 
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SCOOBY  DOO 

Fabricante:  Elite 


El  largamente  esperado  Scooby 
Doo  por  fin  ha  llegado  a 
nuestras  manos.  Desde  hace 
meses  venían  anunciándonos 
desde  Londres  lo  bueno  que 
iba  a  ser  y  lo  popular  que  iba  a  resultar. 
Realmente  es  un  buen  juego,  algo  difícil, 
con  muy  buenos  gráficos  y  música,  pero 
algo  simple.  No  ha  introducido  ninguna 
novedad,  como  suelen  hacer  los  grandes 


con  darle,  eso  sí,  en  el  momento  justo.  Si 
te  pillan  de  espaldas  o  con  la  guardia 
bajada  serás  pasto  de  los  espectros.  El 
mejor  sistema  para  evitarlos  es  moverse 
rápido,  no  dejar  de  dar  puñetazos  y  evi¬ 
tar  que  te  pillen  por  sorpresa  por  ambos 
lados.  La  situación  más  típica  por  la  que 
mueres  es  cuando  uno  de  los  fantasmas 
aparece  a  través  de  una  de  las  puertas  de 
la  pared.  Si  da  la  casualidad  de  que  estás 


allí  (y  en  la  práctica  siempre  estás  allí)... 
¡zap!  estás  muerto.  Es  exasperante  ver 
cómo  pierdes  una  a  una  cada  vida  que 
tienes  (por  cierto,  la  musiquilla  de  la 
“muerte”  acabas  odiándola),  pero  todo 
es  cuestión  de  acostumbrarse  y  “cogerle 
el  truquillo”. 

Hay  dos  tipos  de  fantasmas,  unos  más 
grandes  que  otros.  Los  pequeños  son 
fácilmente  derribables,  entre  otras  cosas 
porque  se  mueven  despacio.  Los  gran¬ 
des  van  a  la  misma  velocidad  que 
Scooby,  por  lo  que  no  puedes  huir  de 
ellos,  además  de  que  es  más  difícil  acer¬ 
tarles. 

El  movimiento  de  los  personajes  no 
está  mal,  sobre  todo  teniendo  en  cuenta 
que  están  muy  bien  definidos.  Lo  malo 
es  el  scroll  de  la  pantalla  ¿no  se  han 
enterado  de  que  existe  una  cosa  llamada 
scroll-fino?,  puede  que  tengan  alguna 
razón  especial  para  no  haberlo  hecho 
así,  pero  la  verdad  es  que  queda  bas¬ 
tante  mal. 

En  los  diversos  pisos  de  la  mansión 
hay  puertas,  por  las  que  salen  los  fan¬ 
tasmas,  a  veces  calaveras  bloqueando  el 
camino  (que  hay  que  evitar)  y  también 
letras  “S”  que  dan  vida  gratis  cada  vez 
que  las  recoges.  Si  no  fuera  por  esto, 
sería  casi  imposible  acabar  la  partida. 

La  música  es  buena  (aunque  sólo 
suena  durante  la  presentación),  pero  los 
efectos  sonoros  no  son  gran  cosa,  todo 
hay  que  decirlo.  Por  lo  demás,  aunque 
la  idea  no  es  muy  nueva,  el  juego  en  sí 
está  bien.  ■ 


juegos.  De  hecho,  es  muy  parecido  a  un 
viejísimo  juego,  Gumshoe,  en  el  que  el 
protagonista  es  un  detective  privado  que 
también  sube  por  una  casa  a  rescatar  a 
la  chica,  evitando  a  los  gángsters. 

El  protagonista  es,  como  su  propio 
nombre  indica,  Scooby  Doo,  protago¬ 
nista  de  un  montón  de  series  de  dibujos 
animados  de  Hanna-Barbera.  El  obje¬ 
tivo  del  juego  es  rescatar  a  sus  amigos  de 
una  casa  habitada  por  fantasmas.  Sus 
amigos  están  literalmente  “enfrasca¬ 
dos”,  metidos  en  unos  botes.  Para  resca¬ 
tarlos  tiene  que  llegar  hasta  ellos,  atra¬ 
vesando  los  distintos  pisos  de  una  casa 
encantada,  llena  de  fantasmas. 

Aunque  Scooby  Doo  es  el  perro  más 
cobarde  del  mundo,  se  enfrenta  a  los 
fantasmas  a  puñetazos.  En  este  aspecto 
del  juego  recuerda  inevitablemente  a 
Kung  Fu  Master,  salvando  las  diferen¬ 
cias.  Para  derribar  a  un  fantasma  basta 


Puedes  saltar  las  calaveras  que  obstaculizan  el  paso ,  teniendo  cuidado  para  no  pisarlas  ni  caer 
sobre  un  fantasma  que  te  esté  “ esperando 
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anteriormente.  No  hemos  conseguido 
pasar  de  aquí,  así  que  no  podemos  deci¬ 
ros  qué  hay  “más  allá”,  pero  sin  duda 
serán  mazmorras  cada  vez  más  intrinca¬ 
das  y  peligrosas. 


Es  difícil  pasar  por  algunos  lugares ,  sobre  todo  si  están  protegidos  por  fantasmas  o  escaraba¬ 
jos.  Lo  mejor  es  destruirlos  y  cruzar  rápidamente. 


Este  juego  es  acción,  fantasía, 
habilidad...  muchas  cosas  uni¬ 
das  que  forman  un  gran 
juego.  Es  una  aventura  en  las 
mazmorras,  muy  parecida  a 
Gaunlet,  pero  con  muchos  alicientes.  El 
protagonista  es  un  mago,  mejor  dicho, 
un  druida.  Tiene  que  adentrarse  en  las 
profundidades  de  un  laberinto,  formado 
por  varios  “pisos”.  Recogiendo  objetos 
mágicos,  hechizos,  llaves  y  pociones. 

El  primer  nivel  es  un  bosque  formado 
por  rocas.  Están  dispuestas  de  tal 
manera  que  forman  paredes  que,  en 
algunas  ocasiones,  no  se  pueden  atrave¬ 
sar.  Los  gráficos  son  magníficos,  muy 
detallados,  con  sombras  y  todo.  Se 
completa  con  un  magnífico  scroll  fino 
horizontal/ vertical  que  da  una  sensa¬ 
ción  de  movimiento  magnífica.  Esta 
parte  del  laberinto  contiene  también 
setos,  árboles  y  un  río,  que  el  druida  no 
debe  atravesar.  Puede  hacerlo,  pero  a 
costa  de  “puntos  de  fuerza”.  Si  estos 
puntos  de  fuerza  llegan  a  cero,  muere. 

Para  recuperar  fuerza  hay  unos  “pen¬ 
tágonos  mágicos”  situados  en  puntos 
estratégicos  del  laberinto.  Cada  vez  que 
el  druida  pasa  por  estos  puntos,  su 
fuerza  aumenta  hasta  el  máximo.  Se 
pueden  utilizar  tantas  veces  como  se 
quiera.  También  hay  unos  objetos  que 
permiten  “repostar”  armas.  Las  armas 
de  que  dispone  el  druida  en  un  principio 
son  agua,  fuego  y  electricidad.  En  la 
parte  superior  de  la  pantalla  aparecen 
simbolizados,  junto  con  el  número  de 
veces  (la  “munición”)  que  se  pueden  uti¬ 
lizar.  Cada  vez  que  disparas,  disminuye 
una  unidad. 

También  hay  llaves  y  conjuros  de 
invisibilidad,  que  pueden  utilizarse  para 
abrir  puertas  o  evitar  ser  visto  por  los 
fantasmas.  El  hechizo  de  invisibilidad 
no  dura  mucho,  y  conviene  utilizarlo 
sólo  cuando  sea  absolutamente  necesa¬ 
rio,  ya  que  escasea  bastante.  Cada  vez 
que  puedes  “repostar”  debes  elegir  en 
cuál  de  las  armas  o  conjuros  vas  a 
hacerlo.  Dependiendo  de  la  situación, 
puedes  elegir  entre  armas  débiles  pero 
en  gran  cantidad,  un  hechizo  o  llave,  o 
tal  vez  un  poco  de  fuego.  La  elección 
puede  decidir  la  partida,  sobre  todo 
cuando  tienes  que  recoger  las  llaves.  En 


algunos  casos  sólo  hay  un  objeto  que 
recoger. 

Para  cruzar  el  río  hay  que  llegar  hasta 
un  puente  situado  en  la  parte  derecha  de 
la  pantalla.  Si  consigues  sobrevivir  y  lle¬ 
gar  hasta  el  final,  verás  que  hay  unas 
escaleras  que  bajan.  Conducen  a  los 
sótanos,  donde  habitan  monstruos  diver¬ 
sos.  Aquí  hay  que  comenzar  a  abrir 
puertas,  utilizando  los  objetos  recogidos 


Los  efectos  sonoros  son  muy  buenos, 
tanto  los  de  los  disparos  como  los  de  las 
explosiones,  abertura  de  puertas  y 
demás.  La  música  de  presentación  es 
magnífica  también.  Si  te  gustan  los  jue¬ 
gos  de  acción,  las  peleas  contra  cinco 
monstruos  a  la  vez,  los  hechizos  y  los 
juegos  de  aventura,  pasarás  un  buen 
rato  recorriendo  las  mazmorras  y  los 
laberintos  de  Druid.  ■ 
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Fabricante:  Software  Projects 


que  esperar  un  rato  hasta  que  el  esque¬ 
leto  de  Dirk  se  recomponía  con  sus  hue¬ 
sos  y  volvía  a  su  aspecto  normal.  En 
ESCAPE  FROM  SINGE’S  CASTLE 
basta  con  pulsar  el  botón  de  disparo 


A  pesar  de  ser  una  segunda  parte,  Dragón  's  Lair  II  es  mucho  mejor  que  la  primera,  sobre  todo 
porque  se  han  corregido  los  pequeños  errores. 


Las  aventuras  del  noble  y  vale¬ 
roso  caballero  Dirk  conti¬ 
núan.  Seguro  que  os  gustó  la 
primera  parte  en  la  que  el 
caballero  rescataba  a  la  prin¬ 
cesa  (o  por  lo  menos  tenía  que  resca¬ 
tarla).  Ahora  otro  objetivo  distinto 
atrae  a  Dirk  hacia  las  mazmorras  del 
Rey  Lizard,  un  auténtico  “lagarto”.  Un 
“Caldero  de  Oro”  espera  a  nuestro 
héroe.  Pero  antes  debe  matar  al  Rey 
Lizard. 

La  primera  prueba  que  debe  pasar 
Dirk  es  de  habilidad  pura.  Entra  en  una 
caverna  a  través  de  un  río  subterráneo. 
Una  sencilla  barca  le  sirve  como  medio 
de  transporte.  Los  remolinos  y  rápidos 
del  río  son  cada  vez  más  violentos.  Hay 
muchas  rocas  que  esquivar.  Pero  una 
misteriosa  luz  se  refleja  en  el  agua  indi¬ 
cando  el  camino  más  seguro  para  la 
navegación  del  guerrero. 

Todo  está  preparado  para  asegurar 
un  tortuoso  camino  al  intrépido  juga¬ 
dor.  No  es  nada  fácil  recorrer  las  prue¬ 
bas  que  te  esperan.  Después  de  los  rápi¬ 
dos  en  el  río  subterráneo,  entrarás  en  un 
pasadizo.  En  él  intentarán  atraparte 
misteriosas  manos  de  fuego,  al  estilo  de 
la  primera  parte. 

Recordando  las  aventuras  de  Indiana 
Jones,  nuestro  caballero  medieval  ten¬ 
drá  que  escapar  de  una  gigantesca  bola 
rodante.  Si  no  corre  lo  suficiente,  a 
empezar  a  correr  otra  vez.  Así,  corrien¬ 
do,  corriendo  llegarás  a  la  estancia  del 
“Caballo  Mágico  Volador”. 

No  todo  va  a  ser  correr.  Los  Mons¬ 
truos  del  Lava  intentarán  desesperada¬ 
mente  impedirte  el  acceso  hacia  el  Cal¬ 
dero  de  Oro.  La  zona  volcánica  por 
donde  debes  escapar  está  -llena  de  her¬ 
vientes  pozos  de  lava.  Allí  la  lava  toma 
vida  y  se  convierte  en  horribles  seres 
monstruosos. 

Los  gráficos  y  el  sonido  de  este  pro¬ 
grama  son  muy  buenos.  Tomando  como 
referencia  la  primera  parte,  se  puede 
decir  que  este  juego  ha  sido  mejorado 
mucho,  en  todos  los  aspectos.  Lo  más 
sobresaliente  de  los  gráficos,  es  que  son 
todavía  más  realistas,  si  cabe.  Están 
mejor  cuidados. 

Durante  el  juego  se  aprecia  un 


aspecto  mejorado  muchísimo  respecto  a 
la  primera  parte,  el  sonido.  Cada  una  de 
las  ocho  partes  del  juego  tiene  una  melo¬ 
día  diferente.  Todos  hemos  apreciado  la 
calidad  de  cierta  música  en  algunos  jue¬ 
gos.  Este  es  uno  de  esos  casos.  General¬ 
mente  se  tiene  poca  consideración  con  la 
música  que  acompaña  a  los  juegos. 
Suele  darse  mucha  importancia  a  los 
sonidos  de  disparos,  golpes  o  puñetazos, 
chillidos,  etc.,  y  se  hace  poco  caso  de  la 
música.  En  este  programa  se  ha  creado 
una  melodía  para  cada  etapa  del  juego  y 
el  artífice  es  Rob  Hubbard,  que  ya  ha 
realizado  composiciones  para  otros 
programas.  Es  una  verdadera  maravilla 
oír  esas  melodías  mientras  sufrimos  las 
peripecias  de  Dirk. 

Uno  de  los  puntos  negros  de  la  pri¬ 
mera  parte  era  la  espera  después  de  una 
muerte.  Siempre  que  te  mataban  tenías 


para  volver  al  furor  de  la  acción.  No  se 
hace  tan  pesado  y  además  te  permite 
concentrarte  más  en  el  desarrollo  del 
juego. 

Tanto  para  los  que  disfrutaron  con  el 
DRAGON’S  LAIR  como  para  los  que 
desconocían  ese  juego,  esta  segunda 
parte  les  maravillará.  En  conjunto  es  un 
buen  programa  y  en  cuanto  a  la  acción  y 
objetivos  del  juego,  es  fenomenal.  No  se 
puede  comparar  con  el  juego  original  de 
las  máquinas  basadas  en  disco  láser. 
Pero  es  una  de  las  mejores  adaptaciones 
que  se  han  hecho  de  programas  de  ese 
medio  a  los  ordenadores  personales. 

La  carga  del  programa  es  muy  efec¬ 
tiva  y  rápida.  Sigue  el  mismo  método 
que  la  primera  parte.  Se  carga  sin  hacer 
perder  el  tiempo  al  jugador,  pues  este 
está  enfrascado  en  el  propio  juego.  ■ 
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El  aspecto  general  del  juego  recuerda 
mucho  al  clásico  Commando,  uno  de  los 
mejores  juegos  de  acción  para  el  C-64. 
La  vista  “aérea”  de  la  ciudad  te  permite 
ver  la  situación  de  los  terroristas:  apare¬ 
cen  por  ambos  lados  de  la  calle,  por  la 
parte  superior  y  a  veces  por  detrás.  Si  te 
colocas  demasiado  arriba  pueden  pillarte 
por  sorpresa  dos  o  tres  y  acabar  contigo 
en  un  momento.  Cuando  uno  de  los 
“malos”  te  atrapa,  te  apalea  hasta  que 
mueres  (¡un  poco  bestia!),  entonces  otro 
de  los  hombres  de  tu  escuadra  pasa  a 
ocupar  tu  lugar.  La  pantalla  se  mueve 
con  un  scroll  fino  vertical. 

Para  hacerlo  más  difícil,  algunos  de 
los  terroristas  lanzan  granadas  de  corto 
alcance.  Son  muy  efectivas,  porque 
siempre  te  pillan  intentando  matarles  de 
cerca,  y  apenas  tienes  tiempo  de  reac¬ 
cionar.  También  hay  algunos  apostados 
en  las  azoteas,  desde  donde  disparan 
con  ametralladoras,  creando  barreras  de 
balas  por  las  que  es  prácticamente 
imposible  pasar.  Según  avanzas  pueden 
ir  apareciendo  coches,  que  te  impiden  el 
paso,  a  la  vez  que  te  garantizan  un  poco 
de  protección.  Puedes  utilizarlos  para 
esquivar  a  tus  enemigos  cuando  te  estén 
pisando  los  talones  y  no  tengas  tiempo 
ni  de  volverte. 

Aunque  la  ciudad  esté  tomada  por 
terroristas,  siempre  hay  algún  ciuda¬ 
dano  despistado  que  se  pasea  por  las 
calles  sin  enterarse  de  lo  que  sucede.  A 
estos  tienes  que  evitarlos,  porque  si  los 
hieres  pierdes  1.000  puntos.  Los  puntos 
se  ganan  según  avanzas  por  las  calles  y 
aniquilas  terroristas.  Al  llegar  al  final  de 
la  calle  aparecen  10  ó  15  terroristas  en 
formación,  y  después  el  jefe  de  la  banda 
llevando  a  una  chica  como  rehén.  Si 
consigues  matarle  (aunque  yo  siempre 
me  cargo  a  la  chica  primero),  pasas  a  la 
siguiente  pantalla,  donde  hay  muchos 
más  enemigos  y  es  más  difícil  circular 
por  la  calzada,  pues  está  bloqueada  con 
coches. 

Los  gráficos  de  la  ciudad  y  los  perso¬ 
najes  son  bastante  simples,  y  la  anima¬ 
ción  es  buena,  pero  un  poco  lenta  en 
general,  aunque  algunos  de  los  terroris¬ 
tas  se  mueven  con  rapidez.  El  sonido  es 
pésimo,  una  melodía  “pum-pum-pum” 
que  se  repite  sin  fin,  y  los  ruidos  de  bala¬ 
zos  y  explosiones  no  son  gran  cosa.  El 
aspecto  “arcade”  del  juego  lo  hace  inte¬ 
resante,  pero  sería  mucho  mejor  si 
tuviera  un  poco  más  de  velocidad.  ■ 


Fabricante:  Firebird 


Los  SWAT  son  más  conocidos 
aquí  como  los  “Hombres  de 
Harrelson”,  por  la  antigua 
serie  televisiva.  Son  los  “Spe- 
cial  Weapons  And  Tactics”, 
algo  así  como  nuestros  GEOS.  En  este 
juego  se  enfrentan  contra  bandas  de 


terroristas  que  están  asolando  la  ciudad 
en  el  año  1999.  Para  eliminarlos 
dispones  de  tres  hombres,  pero  sólo  con¬ 
trolas  uno  cada  vez.  Con  un  rifle  tienes 
que  disparar  contra  ellos,  que  van 
cayendo  como  mosquitos  en  cuanto  te 
pones  a  disparar  rápido. 


Si  no  fuera  por  la  lentitud ,  S  HA  T  podría  ser  un  juego  tan  bueno  como  Comando  o  Creen  Beret. 
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PARK  PATROL 

Fabricante:  Firebird 


Este  juego,  creado  original¬ 
mente  por  Activision,  tiene 
unos  cuantos  añitos,  aunque 
es  ahora  cuando  aparece  la 
versión  para  C-64.  Es  uno  de 
los  típicos  juegos  de  saltar-y-recoger- 
cosas,  muy  en  la  línea  de  los  videojuegos 


de  consola,  con  gráficos  graciosos  y 
muchos  colores,  personaje  saltarín,  rui- 
ditos  simpáticos,  uno  o  dos  jugadores 
(no  simultáneamente)  y  dificultad  cre¬ 
ciente. 

Dejando  a  un  lado  las  galaxias  y  los 
mundos  fantásticos,  el  escenario  de  este 


PARK 

PATROL 


ni  i 


Park  Patrol  es  un  juego  de  un  estilo  muy  típico ,  pero  tiene  su  gracia.  Recoger  basura  y  rescatar 
bañistas  es  el  objetivo  principal. 


juego  es  un  parque,  llamado  Papatoetoe 
Park.  El  parque  está  dividido  en  dos 
mitades,  la  de  arriba  que  corresponde  a 
tierra  firme  y  la  de  abajo  en  la  que  está  el 
lago.  El  protagonista  es  un/ una  guarda 
forestal,  que  tiene  que  recoger  basura, 
salvar  a  los  bañistas  que  se  están  aho¬ 
gando  y  evitar  que  las  hormigas  roben 
comida  de  su  caseta  particular. 

En  la  parte  “acuática”  del  juego  hay 
un  bote  con  motor  fuera  borda,  que 
puedes  utilizar  para  desplazarte  rápi¬ 
damente,  aplastar  a  las  tortugas  que  te 
impiden  el  paso  o  recoger  a  los  nadado¬ 
res  que  estén  en  apuros.  Si  hay  gente 
nadando  no  debes  molestarlos,  porque 
hundirían  tu  barca.  Para  colmo,  el  lago 
está  “sembrado”  de  troncos,  con  los  que 
hay  que  evitar  chocar.  En  los  niveles 
siguientes  hay  también  “serpientes  ma¬ 
rinas”  que  te  matan  con  su  mortífera 
picadura. 

Cuando  el  guarda  salta  al  bosque,  que 
más  que  bosque  parece  desierto,  tiene 
que  recoger  la  basura,  simbolizada  con 
latas  de  coca-cola,  que  hay  diseminada 
por  el  suelo.  Como  enemigos  están  unas 
estúpidas  tortugas  que  te  persiguen.  Si 
te  alcanzan,  estás  muerto.  Al  igual  que 
en  el  agua,  al  crecer  la  dificultad  apare¬ 
cen  arenas  movedizas,  hormigas  y  otros 
indeseables  bichejos. 

El  guarda  puede  saltar  sobre  los  obje¬ 
tos  y  los  animales,  y  también  darles 
patadas,  aunque  esto  último  no  es  muy 
recomendable.  Para  recoger  la  basura 
basta  situarse  encima  de  ella,  y  para  res¬ 
catar  a  los  bañistas  igual.  No  es  muy 
difícil,  porque  el  guarda  es  más  rápido 
que  los  animalitos,  y  puede  esquivarles 
con  facilidad,  a  menos  que  le  acorralen... 

Finalmente,  hay  una  opción  muy 
curiosa  en  el  menú  principal,  que  per¬ 
mite  seleccionar  el  número  de  bichejos 
que  aparecen  en  cualquiera  de  los  5  nive¬ 
les  que  hay.  También  puedes  cambiar 
ser  chico/ chica  y  otros  valores.  Una  vez 
modificados,  puedes  grabarlos  en  cinta 
para  utilizarlos  posteriormente.  Este 
“menú  de  opciones”  es  algo  que  tienen 
muy  pocos  juegos  y  que  resulta  muy 
interesante. 

Los  gráficos  son  buenos,  pero  no  exa- 
geramente  originales.  El  sonido  está 
muy  bien,  al  igual  que  la  música  y  la 
dificultad  del  juego  lo  hace  asequible 
para  todas  las  edades.  ■ 
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Los  ordenadores  son  una  herra¬ 
mienta  importante  para  mul¬ 
titud  de  trabajos,  también 
para  los  ingenieros  aeronáuti¬ 
cos  y  los  futuros  pilotos.  La 
simulación  de  un  vuelo  real  constituyó 
pronto  una  importante  faceta  del  de¬ 
sarrollo  de  software  para  ordenadores. 
La  potencia  gráfica  y  la  velocidad  influ¬ 
yen  en  la  calidad  del  simulador,  pero  en 
general  son  muy  útiles,  incluso  los  más 
sencillos. 

Con  la  aparición  de  ordenadores 
domésticos  y  personales,  los  creadores 
de  software  aprovecharon  también  estas 
máquinas  para  programar  simuladores 
de  vuelo  como  FLIGHT  SIMULATOR 
II  o  SOLO  FLIGHT.  De  este  último 
vamos  a  ocuparnos  ahora.  Y  haremos 
referencia  también  a  la  más  reciente  ver¬ 
sión  SOLO  FLIGHT  II 
Cuando  los  juegos  de  ordenadores 
caseros  se  limitaban  a  dejarnos  matar 
marcianos,  aparecieron  los  primeros 
simuladores.  Este  tipo  de  programa 
permite  entretenerse  jugando  y  demos¬ 
trar  las  capacidades  de  pilotaje.  En  este 
simulador  de  vuelo  aparece  un  sprite 
representando  al  avión  que  nosotros 
pilotamos.  Esto  ya  marca  una  diferencia 
entre  los  simuladores.  En  algunos  apa¬ 
rece  nuestro  avión  y  en  otros  no. 

La  pantalla  está  llena  de  controles 
para  la  altura,  velocidad  horizontal  y 
vertical,  cantidad  de  combustible,  estado 
de  los  frenos  y  flaps,  indicador  de  ayuda 
a  la  navegación  (1LS),  etc.  Todos  los 
elementos  de  la  pantalla  son  activos,  hay 
pocos  “adornos”.  El  escenario  que  se 
divisa  por  encima  de  los  mandos  de  la 
cabina,  a  través  del  cristal,  es  bastante 
bueno.  No  se  puede  decir  que  los  gráfi¬ 
cos  de  fondo  sean  estupendos  porque 
son  sencillos.  Pero  la  verdad  es  que 
están  bien  hechos  y  dan  sobrada  impre¬ 
sión  de  realismo  al  “piloto  de  ordena¬ 
dor”.  Todo  lo  que  aparece  en  la  parte 
superior,  el  escenario,  está  contenido  en 
los  mapas  que  acompañan  al  manual  y 
al  programa. 

El  movimiento  de  los  gráficos  es  bas¬ 
tante  rápido  y  efectivo.  Teniendo  en 
cuenta  la  época  en  que  apareció  este 
programa,  era  una  verdadera  obra  de 
arte  en  relación  calidad-movimientos. 
Incluso  los  giros  del  avión  dan  sensación 
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SOLO  FLIGHT 

Fabricante:  Microprose  79 


¿Podéis  creeros  que  la  mayor  parte  de  este 
programa  está  escrito  en  Basic?  Solo  Flight 
sigue  siendo  uno  de  los  mejores  simuladores 
de  vuelo  de  todos  los  tiempos. 


de  realismo  en  los  picados  y  virajes 
bruscos.  Mientras  te  desplaces  por  el 
espacio  aéreo  del  Estado  que  elijas,  el 
ordenador  estará  calculando  y  prepa¬ 
rando  la  representación  de  las  vistas 
exteriores  desde  los  lados  y  la  parte  pos¬ 
terior  del  avión.  Así,  cuando  desees  ver 
pasar  el  paisaje  por  los  lados  o  alejarse 
por  detrás,  bastará  con  pulsar  las  teclas 
del  cursor  y  disfrutarás  de  una  magní¬ 
fica  vista.  Esto  puede  ser  útil  cuando  te 
encuentres  un  poco  perdido. 

En  relación  con  otros  simuladores 
posteriores,  SOLO  FLIGHT  es  menos 
juego  que  la  mayoría  de  ellos.  A.C.E., 
JET,  ACROJET,  STUNT-FLYER,  etc., 
son  simuladores  de  una  gran  calidad, 
que  han  incluido  elementos  de  juego. 
Suelen  basarse  en  combates  aéreos,  ata¬ 
ques  a  tierra,  ataques  navales,  etc.,  aun¬ 
que  guardan  las  normas  de  los  simula¬ 
dores  en  los  que  sólo  se  vuela. 

Para  llegar  a  un  mejor  aprovecha¬ 
miento  del  simulador,  al  igual  que  en 
otros  programas  de  juegos  y  aplicacio¬ 
nes,  se  introdujo  el  sintetizador  de  voz. 
Este  espectacular  elemento  ayuda  mucho 
al  hacer  más  agradable  el  manejo  del 
programa.  Así  surgió  SOLO  FLIGHT 
II.  Cuando  se  pone  en  marcha  esta  ver¬ 


sión  mejorada  del  simulador  inicial,  una 
agradable  voz  nos  indica  las  maniobras 
de  vuelo.  Es  un  instructor  o  una  orde¬ 
nador  de  “a  bordo”,  según  la  modalidad 
de  vuelo  en  la  que  estemos  pilotando. 

Si  entramos  en  la  modalidad  de 
aprendizaje,  el  ordenador  nos  indicará 
las  maniobras  a  realizar  y  nos  guiará  por 
medio  de  la  voz.  Si  se  realiza  una  mala 
maniobra,  siempre  nos  avisa  con  tiempo 
suficiente  para  rectificar.  Es  un  buen 
instructor. 

Si  vuelas  como  piloto  de  correo,  reco¬ 
gerás  carga  y  la  repartirás  por  todos  los 
aeropuertos  del  Estado.  Tienes  que 
tener  cuidado  con  el  consumo  de  com¬ 
bustible  y  el  equilibrio  de  la  carga  en 
cada  vuelo.  Aquí  tendrás  una  compen¬ 
sación  en  puntos.  Es  la  parte  más  pare¬ 
cida  a  un  juego,  aunque  tiene  todos  los 
elementos  del  simulador.  Más  o  menos 
es  lo  mismo  que  ocurre  con  otros  simu¬ 
ladores.  Si  tienes  que  derribar  cazas 
enemigos,  también  debes  mantener  tu 
atención  en  todos  los  controles  de  vuelo. 
No  todo  va  a  ser  disparar. 

Las  posibilidades  de  vuelo  acrobático 
con  este  simulador  son  nulas.  No  se 
puede  hacer  un  rizo,  un  tonel  o  un 
picado  en  vertical.  El  deslizamiento  lon¬ 
gitudinal  es  bastante  suave,  aunque  los 
instrumentos  de  la  cabina  indiquen  una 
caída  brusca  del  aparato.  El  control  no 
es  muy  complicado,  basta  con  guardar 
las  normas  generales  para  despegue  y 
aterrizaje,  mantener  un  vuelo  horizontal 
regular  y  no  perderse.  Todo  esto  es  dife¬ 
rente  en  los  simuladores  posteriores,  en 
los  que  están  previstas  las  posibilidades 
del  vuelo  invertido,  el  rizo,  etc... 

Este  programa  resultó  un  gran  descu¬ 
brimiento  para  los  usuarios  del  C-64  en 
el  año  84.  Todavía  está  vigente  aunque 
tengamos  en  el  mercado  otros  simulado¬ 
res  más  modernos.  Para  los  que  deseen 
volar  con  sencillez  de  acción,  es  un  pro¬ 
grama  ideal.  También  sirve  a  los  que  les 
gustan  las  complicaciones,  ya  que  pue¬ 
den  ir  entrenándose  para  pasar  a  otros 
simuladores  más  completos  y  difíciles. ■ 


PROXIMO  MES 


SUMMER  GAMES 


N'  I  EN  APLICACIONES  Y  UTIL  IBA  BES  PARA  Comitiodore 


CHV1EX 

ELECTRONICA 


SUPERC0N1A  64  I 

Programa  realizado  en  código  máquina,  lo  que  implica  mayor  ra 
pidez  y  ocupa  menos  memoria. 

Tiene  una  capacidad  de  475  cuentas,  5300  apuntes  de  disco 
y  305  apuntes  por  día.  El  limite  de  475  cuentas  se  debe  a  que 
están  siempre  en  memoria  y  se  puede  acceder  a  ellas  instanta- 

neamente.  L 

Se  pueden  introducir  asientos  en  cualquier  fecha,  también  at  - 
sadas,  él  mismo  genera  el  número  de  asiento  y  ademas  visuali¬ 
za  el  número  de  línea,  descuadre  del  asiento  y  titulo  de  cuenta, 
también  se  puede  dar  de  baja,  el  programa  actualiza  automáti¬ 
camente  todo,  se  puede  introducir  un  asiento  en  un  solo  apunte. 
Los  listados  se  pueden  hacer  en  cualquier  fecha  y  las  veces  que 
se  desee:  diSCO  19.900 


tea.  y  copia,  discos  de  MS  D0®  “"^f^códigos  ASCII  en  ASCII 

Disco  9.900 


COMPILADOS  ,d)  5.000 

CONTABILIDAD  PERSONAL  (d)  3.000  (c)  3.500 
EDITOR  DE  ETIQUETAS  (d)  1000  (c)  3.500 
SIMULADOR  DE  SPECTRUM  (C)  2.500 


(d)  3.500  (c)  3  030 

perspectivas  (0)  5,000  (c)  4  500 
GESTION  DE  STOCKS  ,d,  ,0.000 

EDITOR  DE  RECIBOS  (d)  15.000 

ArUDA  AL  PROGRAMADOR  fd)  3.000  (c)  2.500 


base  de  datos 


(«0  8.000  (c)  3.500 


(d)  15.000 


CINTA  C-IO  «10  unidades) 

CINTA  C-20  (10  unidades) 

CABLE  CENTRONICS  C-64 

FUNDA  C-64  y  VIC-20 

JOYSTICK  QUICKSHOT  II 

JOYSTICK  QUICKSHOT  I 

JOYSTICK  QUICKSHOT  II  +  (con  micromjpto.es) 

KIT  AJUSTE  DATASSETTE 
PLATINA  EXPERIMENTAL  port  usuario 
PLACA  EXPANSION  PORT  USUARIO  (3  sal  das) 
EXPANSION  PARA  4  CARTUCHOS 
VENTILADOR  PARA  DISK  DRIVE 
CABLE  40/80  COLUMNAS  PARA  C- 128 
CASSETTE  COMPATIBLE  C-64  y  VIC-20 


PRINTER 
IV  3.450.' 


Añadía  ^sUim  ^  Pa'a  impresora  MPS-801 

Fác¡lcolocación'smsoldádPu0rasmáS  ^  Carac,eres 

dtr,eu,2asw;t:rde,á  a  4  ,ipos  di<— 

ECLIP3C  ‘FUTURE 

100%  compatible  con  todos  ios  programas  y  gráficos 


1]  bph  a 

SJ/4  CENTRO  REFORZADO  CALIDAD  GARANTIZADA. 

S®  ^ECWtaiMOOORMfPUytT/llU  00-üideri  I  750 
D^DD.  ESPECIAL  PC  Y  COMPATIBLES  00*^)2.050 


PROGRAMADOR  DE  EPROMS 
EPROMER  II 


•  Desde  2716-27256  E  Eproms.  27  CXXX 

•  Selecciona,  lee,  verifica  y  copia 

*  Conectable  al  pod  de  usuario 
>  Sin  alimentación  extenor 

*  Vottaie  12,5, 21.25  v 

1  Software  en  disKette 

8,1,6  K  14,900 


INTEGRADOS  Y  CONECTORES 

CIA  6526  110 

CPU  6510  aio 

SID  6580  M* 

PAL  6569  Mt 

PLA  906114  aiC 

8502  43 

8721  4SC 

8701  ai< 

CONECTOR  PORT  USUARIO  7! 

CONECTOR  PORT  EXPANSION  para  placa  121 
EPROM  27128  9< 


CONDICIONES  ESPECIALES  PARA  DISTRIBUIDORES  | 


NUKVA  CAJA  PAMA  C-«4 

Déle  nueva  imagen  a  su  64  susti¬ 
tuyendo  la  carcasa  antigua  por 
la  nueva  de  perfil  bajo  similar  a 
la  dol  nuevo  64  C.  mediante  una 
sencilla  operación. 


«*  iaaza Mamo  , 


[  IC  TESTER 

eproms  4  x  8  K 
BORRADOR  DE  EPROMS 

1 0  fara  ^  y  ® 

"®XCHER  (Taladro  doble  cara  diskettes) 

,VÍ5.®Íe"  ct'Skene  o  cassettej 

CINTA  IMPRESORA  MPS-801  v  6P/500 
CINTA  IMPRESORA  STAR  SG-lS  y  OKI  80 


ESPECIAL  USUARIOS  C-16 

ADAPTADOR  CASSETTE  1  250 
ADAPTADOR  JOYSTICK  950 
AMPLIACION  MEMORIA  64  K  9  900 
JUEGOS  VARIOS  (CONSULTA* 


~WTERMCÍRTfY/CW~ 
NEWSOME  ELECTRONICS.  Ü.S.A. 

SSSK 

-SOLO  19400  Ftt&— 


SERVICIO  DE  REPARACIONES  >f 

REPARACION  DE  C-64,C-I?8,C-I6  Y  VIC-20  ^ 

OISK  ORIVE  1541,1520  Y  1521  REPARACION  Y  AJUSTE. 
REPARACION  Y  AJUSTE  DATASSETTES. 


SOLIOTE  NUESTRO  CATALOGO 

ENVIOS  CONTRA  REEMBOLSO  A  T00A  ESPAÑA  SIN  GASTOS 

ENVIOS  INFERIORES  A  2.000  PTAS.,  AÑADIR  300  PARA  GASTOS  DE  ENVIO. 

SU0AMERICA  AÑADIR  700  PTAS 

ACEPTAMOS  TARJETAS  DE  CREDITO. 


CIMEX 


ELECTRONICA 


FLORIDABLANCA,  54  Ent.  3°  A 
08015  BARCELONA 


Tel.  424  34  22 


El  LOGO  se  conoce  como  el  len¬ 
guaje  de  la  tortuga  por  orien¬ 
tarse  la  programación  al  movi¬ 
miento  de  una  supuesta  tortuga 
en  pantalla  o  al  control  de  un 
robot  (que  suele  adoptar  formas 
a  imitación  de  simpático  quelonio).  Su 
origen  arranca  de  1968  cuando  en  el 
MIT  (Massachusetts  Institute  of  Tech¬ 
nology)  se  desarrolló  una  primera  ver¬ 
sión  que  derivaba  directamente  del  len¬ 
guaje  de  inteligencia  artificial  L1SP.  El 
principal  impulsor  del  nuevo  lenguaje 
fue  Seymour  Papert  y  ya  en  los  años 
80  la  mayoría  de  micros  populares  dis¬ 
ponían  de  su  propia  versión  de  LOGO. 
Las  versiones  más  difundidas  han  sido 
Logo  MIT  y  Logo  LCSI  que  presentan 
algunas  diferencias  formales  entre 
sí  sin  que  éstas  afecten  gravemente  a  la 
compatibilidad  de  programas  en  LOGO. 

Cuando  se  utiliza  este  lenguaje  en  un 
micro  personal  se  aprecian  inmediata¬ 
mente  deficiencias  en  cuanto  a  veloci¬ 


El  LOGO  es  un  lenguaje  interpretado 
(al  igual  que  el  BASIC),  concebido 
con  fines  educativos  y  que  ha  tenido 
una  difusión  importante  en  este 
campo.  Entre  las  cualidades  que  lo 
hacen  atractivo  al  recién  incorporado 
a  la  informática  están  su  carácter 
interactivo  (las  instrucciones 


*£&»*** 


guaje  (tarea  extremadamente  ardua  y 
que  dejo  en  manos  de  las  compañías  de 
Software  como  Logo  Computer  Systems 
y  demás)  sino  crear  una  herramienta 
que  posibilite  al  usuario  del  Commo- 
dore  128  tener  un  primer  conocimiento 
de  la  programación  en  LOGO.  De  todas 
formas,  M1CROLOGO  incorpora  las 
características  esenciales  de  cualquier 
intérprete  que  se  precie  de  tal,  permi¬ 
tiendo  la  programación  a  nivel  básico. 

a  Pft0' 
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dad  de  ejecución  y  a  espacio  libre  de 
memoria  que  tienen  su  origen  en  las 
limitaciones  de  hardware. 

Los  intérpretes  clásicos  de  LOGO 
precisan  unos  30  Kb  más  8  Kb  para  la 
pantalla  de  gráficos,  incorporan  órde¬ 
nes  para  manejo  de  Sprites  (particulares 
de  cada  máquina),  órdenes  de  bifurca¬ 
ción  condicional  y  demás  sofisticaciones 
adicionales.  Con  el  programa  MICRO- 
LOGO  128  no  he  pretendido  realizar 
una  implementación  completa  del  len- 
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Se  ha  limitado  el  tratamiento  de 
variables  y  no  se  permite  anidar  bucles  o 
procedimientos  a  fin  de  reducir  la 
extensión  del  programa  y  hacerlo  más 
rápido.  En  cuanto  a  la  rapidez  del  pro¬ 
grama  se  han  incluido  comandos  FAST 
en  las  rutinas  que  no  implican  una 
visualización  inmediata  en  pantalla  del 
resultado  que  provocan  un  parpadeo  en 
la  pantalla  que  quizás  pueda  resultar 
molesto  (en  cuyo  caso  no  hay  más  que 
eliminar  todos  los  FAST  del  listado). 


Vamos  pues  con  la  descripción  de  los 
comandos  y  posibilidades  del  pro¬ 
grama: 

Los  comandos  serán  procesados  tras 
pulsar  RETURN  y  se  ejecutarán.  Los 
únicos  comandos  que  no  se  ejecutan  en 
el  acto  son  los  que  se  digitan  durante  la 
definición  de  procedimientos. 

FORWARD:  Hace  avanar  la  tortuga 
hacia  adelante.  Debe  dejarse  un  espacio 
entre  el  comando  y  el  número  que 
implica  el  desplazamiento. 

BACK:  Es  el  inverso  de  forward  y  la 
sintaxis  es  la  misma. 

RIGHT:  Hace  que  la  tortuga  gire  a  la 
derecha  tantos  grados  como  indique  el 
número  que  le  sigue. 

LEFT:  Igual  a  right  pero  con  giro  a  la 
izquierda. 

PENUP:  Hace  que  la  tortuga  se  des¬ 
place  sin  dejar  rastro  en  pantalla. 

PEN DOWN:  Tiene  el  efecto  contra¬ 
rio  a  penup  y  es  el  modo  en  que  arranca 
el  programa.  En  la  línea  superior  apa¬ 
rece  constantemente  “up”  o  “down” 
según  la  modalidad  en  que  nos  encon¬ 
tremos. 

PRINT:  Cuando  va  seguido  de  una 
frase  entre  corchetes  imprimirá  la 
misma  en  pantalla.  Ejemplo:  PRINT 
[mensaje]. 

Si  va  seguido  de  un  nombre  de  varia¬ 
ble  imprimirá  el  contenido  de  la  misma 
en  pantalla.  Ejemplo:  PRINT  :VAR 
imprimirá  en  pantalla  :VAR  =  3  (si  es 
que  VAR  contiene  3). 

Si  va  seguido  por  el  sufijo  PROCS 
imprimirá  en  pantalla  las  definiciones 


ERASE:  Va  seguido  de  un  nombre  de 
procedimiento  y  lo  borra  de  la  memo- 


Por  Caries  Abarca  de  Haro 


se  ejecutan  inmediatamente  después 
de  ser  entradas  permitiendo 
apreciar  los  resultados),  la  sencillez 
en  el  uso  de  sus  comandos 
residentes  y  la  facilidad  con  que 
se  pueden  definir  nuevos 
comandos  que  reciben  el  nombre 
de  procedimientos. 


existentes  en  memoria  (procedures).  Si 
va  seguido  por  PROCSLIST  se  des¬ 
viará  la  lista  a  la  impresora. 

DRA  W:  Borra  la  pantalla  de  gráfi¬ 
cos.  Aparece  el  mensaje  SCREEN’- 
CLEAR  cuando  se  ejecuta  este  co¬ 
mando. 

NEW :  Borra  de  la  memoria  las  ins¬ 
trucciones  que  puede  reproducir  con  el 
diato.  A  diferencia  de  otros  Logos, 
Micrologo  conserva  en  memoria  las  ins¬ 
trucciones  que  pude  reproducir  con  el 
comando  START. 

START:  Ejecuta  las  instrucciones 
digitadas  desde  que  el  programa  empezó 
a  funcionar. 

REPEA  T:  Permite  repetir  la  secuen¬ 
cia  de  instrucciones  contenidas  entre  los 
corchetes.  No  se  permite  otro  REPEAT 
dentro  de  los  corchetes  ni  un  procedi¬ 
miento  que  utilice  esta  instrucción.  Son 
ejemplos  de  sentencias  válidas:  RE¬ 
PEAT  4  [FORWARD  40  RIGHT90] 
(dibuja  un  cuadrado)  REPEAT  8 
[nombre  de  procedimiento]  REPEAT 
:REP 

[FORWA  RD:  LONG  RIGHT:  ANG] 
(los  dos  puntos  van  seguidos  por  un 
nombre  de  variable). 

SETXY:  Desplaza  la  tortuga  a  la 
coordenada  indicada.  No  admite  nom¬ 
bres  de  variables  como  coordenadas 
válidas.  Ejemplo:  SETXY  10  15  (sitúa 
la  tortuga  en  x=10  y=15  estando  el 
punto  0,0  en  el  centro  de  la  pantalla  de 
gráficos). 

EDIT:  Debe  ir  seguido  por  un  nom¬ 
bre  de  procedimiento.  Si  dicho  nombre 


ya  ha  sido  asignado  a  un  procedimiento 
MicroLogo  informará  de  ello  permi¬ 
tiendo  que  se  reescriba  en  él.  Tras  digi- 
tar  la  instrucción  se  borra  la  pantalla  de 
texto  apareciendo  TO  seguido  del  nom¬ 
bre  de  procedimiento.  Acto  seguido 
puede  digitar  las  instrucciones  del 
mismo  modo  que  lo  haría  en  modo 
inmediato  pero  éstas  no  se  ejecutarán. 
Para  finalizar  la  definición  del  procedi¬ 
miento  digite  END  en  una  línea  que  no 


CA  TALOG:  Imprime  el  directorio  de 
programas  Logo  presentes  en  el  disco 
(son  reconocidos  porque  MicroLogo  los 
graba  procedidos  por  LG>.). 

ERASEFÍLE:  Borra  un  programa 
Logo  presente  en  el  disco. 

READ:  Lee  un  programa  Logo  del 
disco  y  lo  sitúa  automáticamente  en  el 
área  de  memoria  adecuada  (la  de  proce¬ 
dimientos  o  la  de  instrucciones  según  el 
tipo  de  fichero). 

S/4  VE:  Graba  en  el  disco  los  proce¬ 
dimientos  definidos  hasta  ese  momento 
o  bien  las  instrucciones  que  se  hayan  ido 
digitando  en  modo  directo  (o  ambas 
cosas  a  la  vez). 

MA  KE:  Asigna  un  valor  a  una  varia¬ 
ble  o  realiza  operaciones  aritméticas 
simples.  MAKE  debe  ir  seguido  por  un 
nombre  de  variable  entre  paréntesis  y 
después  por  un  número,  un  signo  de 
interrogación  o  nombres  de  variables 
relacionados  por  un  operador.  Por 
ejemplo:  MAKE  (VAR)  2  asigna  el 
valor  2  a  la  variable  VAR. 

MAKE  (VAR)  ?  espera  a  que  entre¬ 
mos  un  valor  desde  el  teclado  para  asig¬ 
narlo  a  la  variable  VAR. 

MAKE  (VAR)  :VAR  +  1  incrementa 
en  una  unidad  el  contenido  de  VAR. 

MAKE  (VAR)  :VAR  *  :MULTI 
asigna  a  VAR  el  resultado  de  multipli¬ 
car  por  el  contenido  de  la  variable 
MULTE  Las  operaciones  permitidas 
son  la  suma  (+),  la  resta  ( — ),  la  multi¬ 
plicación  (*)  y  la  división  (/)  y  son  sufi¬ 
cientes  para  producir  complejas  figuras. 

Todos  los  comandos  excepto  SETXY 
aceptan  variables  como  parámetros  a 
utilizar  y  las  reconocen  por  ir  precedi¬ 
das  por  los  dos  puntos.  Es  muy  impor¬ 
tante  respetar  la  sintaxis  expuesta  para 

„„osO 
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deberá  contener  ninguna  otra  instruc¬ 
ción.  Aparecerá  el  mensaje  “procedure 
defined”  y  cada  vez  que  digite  el  nombre 
del  procedimiento  se  llevarán  a  cabo  las 
instrucciones  especificadas  en  el  mismo. 

Ejemplo:  EDIT  CUADRADO 
(aparece  en  pantalla  TO  CUADRADO) 
PENDOWN 

REPEAT 4 [FORWARD 40  RIGHT 90] 
END 

(aparece  en  pantalla  PROCEDURE 
DEFINED) 


el  correcto  funcionamiento  de  sus  pro¬ 
gramas. 

En  la  línea  superior  aparece  constan¬ 
temente  el  ángulo  y  la  posición  actual  de 
la  tortuga  que  se  representará  en  pan¬ 
talla  como  un  triángulo  que  varia  su 
orientación  de  acuerdo  con  el  ángulo 
(forma  ésta  muy  utilizada  por  los  intér¬ 
pretes  de  Logo  más  populares). 

Espero  que  el  programa  despierte  el 
interés  por  este  lenguaje,  propósito  para 
el  que  fue  creado.  ■ 
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PROGRAMA i  MICROLOGO  LISTADO  1 


10  REM  MICROLOGO  C-128  .228 

20  REM  (0  1987  BY  CARLES  ABARCA  .56 

30  REM  . 92 

40  C0L0R4, 6 s COLORI , 1 1 COLOR0 , 4  .62 

50  SCNCLR  .214 

51  LI=0  .225 

55  TRAP  50000  .111 


60  DIM  IN* (255) s  DIM  TBL*(25):DIM  PR  .232 
♦  ( 10 , 30) s  DIM  TR$ (36) : DIM  VA(255> 

61  FAST : FORFF*0TO36s GRAPHIC1 ,  1 : CIRC  .243 
LEI , 10, 10, 4, 4,0, 360, FF* 10, 120sPAINT 
1,10, 10i SSHAPE  TR*(FF) , 0 , 0 , 23 , 21 ; NE 

X  TFF : GRAPH I C0 

65  FOR  R=0TO17i READTBLS (R) : NEXT  .165 

66  DATA  FQRWARD , BACK , R I GHT , LEFT , PEN  .234 
UP , PENDOWN , PR I NT , REPEAT , SETXY , ERASE 

, MAKE , SAVE , READ , CATALOG , ERASEF I LE , S 
T  ART , DRAW , NEW 

67  FORZD=0TO10:FORZE=0TO30:PR$(ZD, Z  .205 
E) ="EMPTY" s  NEXTZEs  NEXTZD 

70  SLOW: PRINT" CH0M3 CWHT3 "  .168 

80  PR I NT " C 9SPC 3  C  COMMA  3  C  COMMS  3  C  3SPC 3  .106 
C  COMMA  3 C 3SH I FTC 3  C COMMS  3  C  COMMA  3  C 3SH I 
FTC 3  C  COMMS  3  C  COMMA  3  C  3SH I FTC  3  C COMMS  3 
90  PR I NT " C  9SPC  3  C 2SH I FTB  3  C  3SH I FT  SPC  .24 
I C  SH I FTB I C  COMMA  3  C  SH I FTC  3  C  COMMS  3  C 2SH 
I FTB  3  C  COMMA 3  C  SH I FTC  3  C  COMMS  3  C  2SH I FTB 
3  C  COMMA 3  C  SH I FTC  3  C COMMS  3  C  SH I FTB  3 
100  PR I NT " C  9SPC  3  C  2SH I FTB  3  C 3SPC  3  C  2SH  .92 
IFTB3  C4SHIFTB3  CSHIFT  SPC 3  C COMMZ  3  C C 
OMMX  3  C2SHIFTB3  CSHIFT  SPC 3  C2SHIFTB3 
110  PR I NT " C  9SPC  3  C  2SH I FTB  3  C  3SH I FT  SP  .50 
C3C2SHIFTB3 CSHIFT  SPC 3  C 4SHIFTB3  CCOM 
MA3  CSHIFTC3  C COMMS 3  C2SHIFTB3  CSHIFT  S 
PC3  C2SHIFTB3 

120  PR I NT " C  9SPC  3  C  2SH I FTB  3  C  3SH I FT  SP  .128 
C3C2SHIFTB3 CSHIFT  SPC 3  C4SHIFTB3  CCOM 
MZ  3  C  COMMS 3  C  3SH I FTB 3  C SH I FT  SPC 3  C  2SH I 
FTB3 

130  PRINT" C9SPC3  CSHIFTB3  C COMMZ  3  CSHI  .198 
FTC 3  CC0MMS3  CSHIFT  SPC 3  CSHI FTB 3  CCOMM 
Z  3  CSHI FTC 3  CCOMMX  3  C2SHIFTB3  C COMMZ  3  CS 
HIFTC3  CCOMM X  3  C2SHIFTB3  C COMMZ  3  CSHIFT 
C  3  C  COMMX  3  C  SH I FTB  3 

140  PRINT" C9SPC3  C COMMZ  3  C2SHIFTC3  CCO  .134 
MMX  3  C  COMMZ  3  C  3SH I FTC 3  C COMMX  3  C COMMZ  3 
C  3SH I FTC 3  C COMMX  3  C  COMMZ  3  C  3SH I FTC 3  C CO 
MMX  3 

150  PR I NT " C  C0MM6  3 "  .236 

160  PR I NT " C  7CRSRR 3  C  RVSON  3  C  25SPC I  C  RV  .156 
S0FF3" 

170  PRINT" C7CRSRR3  C RVSON 3  LOGO  ' MI T  .152 
'  PARA  C-128  Y  C RVSOFF I" 

180  PRINT " C7CRSRR3  C RVSON 3  PANTALLA  .26 
DE  40  COLUMNAS  C RVSOFF 3 " 

190  PR I NT " C  7CRSRR  3  C  RVSON  3  SOPORTA  L  .14 
A  MAYORIA  DE  C  3SPC  3  C  RVSOFF  3 " 

200  PR I NT " C  7CRSRR  3  C  RVSON  3  C  3SPC  3 I NST  .202 
RUCC IONES  EN  EL C 3SPC 3  C RVSOFF 3 " 

210  PR I NT " C  7CRSRR  3  C  RVSON  3  C  2SPC  3  M I SM  .50 
O  FORMATO  QUE  EN C 3SPC  3  C RVSOFF 3 " 

220  PR I NT " C  7CRSRR  3  C  RVSON  3  INTERPRET  .62 
E  ORIGINAL  CON  C RVSOFF 3" 

230  PR I NT " C 7CRSRR 3  C RVSON 3  POSIBILID  .168 
AD  DE  GRABAR C3SPC 3 C RVSOFF 3" 

240  PR I NT " C 7CRSRR 3  C RVSON 3  SUS  PROPI  .100 
OS  PROGRAMAS . C  2SPC 3  C  RVSOFF  3 " 

250  PR 1 NT " C  7CRSRR  3  C  RVSON  3  C  25SPC  3  C  RV  .246 
S0FF3 " 

260  PR  I  NT  "  C  3CRSRD  3  C  WHT  3 - .239 

- TECLA - "  :  GETKE 

YC* 

265  FAST  . 48 

270  GRAPH IC2f 1,16  .223 

275  OXs160: QY=60; AN=0: CX=0: CY=0: SK$  .252 
="DOWN" 

280  WINDOW  0,16, 39 , 24 , 1 : SPRI TE1 ,1,1  .103 

281  DRAW  1,0,127  TO  319,127  .244 

290  PR I NT " C  BLK  3  C  CLR  3  C  RVSON  3  M I CROLOG  .227 
O  ( C . ABARCA ) C  RVSOFF  3 " 

295  SLOW  .  Q6 

296  CHAR1 ,3,0, "GRAD: "+STR* ( AN) +" C5S  .151 
PC3<X>"+STR*(INT(CX) )+"  <Y>"+STR*(I 


NT (CY) )+"C 3SPC 3 " +SK$+" C  3SPC 3 " 

297  DRAW1 , 0 , 8T0319 ,8: CIRCLE1 , (8+LEN  .196 
(STR* ( ANj ) ) *8+2,2 , 2,2 

298  B0X1 ,0,0, 10, 10,0, 1:CIRCLE0,5,5,  .21 
4, 4,0, 360, AN, 120 

299  SPRSAV  TR* ( INT (AN/10) ) , 1 s MOVSPR  .52 
1  ,CX+0X  +  14,CY+0Y-»-39 

300  GOSUB  1000  .3 

310  IF  LEFT*(IN*,4)="EDIT"THEN  GOTO  .187 

14000 

320  GOSUB  2000  .31 

321  SPRSAV  TR*(INT(AN/10) ) , 1 : MOVSPR  .74 
1 ,CX+0X+14,CY+0Y+39 

330  GOTO  296  .93 

340  :::::::::::::::::::::::::::::::  .15 

:  :  : 

1000  REM - INTROINS - .147 


1005  PRINT" CC0MMS3 CCRSRL3" IN*=""  .172 

1010  GETKEY  C*  .3 

1015  IF  C*="_"  THEN  PRINT : PRINT"***  .30 
***  LINEA  ANULADA  ***#***": INS=" " s G 
OTO1010 

1016  IF  C$= " C CRSRL 3 "  OR  C*="CCRSRR3  .209 
"  OR  C$=" CCRSRU3 "  OR  C*=" CCRSRD3 "  T 

HEN  1010 

1017  ’IF  C*=CHR*(20>  ANDLEN(IN*>  >=1TH  .144 
EN  INS=LEFT$(IN$,LEN(IN*)-1>  sPRINTC 

♦  " C  COMMS  3  C  CRSRL  3 " ; :GOTO1010 
1020  IF  C$<  >CHR$ (13) ANDC$<  >CHR$ (20)  .159 

THEN  I N*= I N*+C* : PR I NTC* " C  COMMS 3  C  CRS 
RL3 " ; : GOTO1010 

1025  IF  I N$= " " THENPR I NT " C COMMS 3 " : GO  .69 
TO  1010 

1030  PRINT  i  LI=L1+1 :  IN$  (LI )  =  1N$  .52 

1035  IF  L 1=255  THENPR I NT " C RVSON 3 END  .39 
OF  I NSTRUCT I ONS  MEMORY  C RVSOFF  3 " : L I 
=0 

1040  RETURN  .78 

2000  REM - EXECUTE - .171 


2010  L=LEN ( I N$ ) : COM$= " " 

2020  FOR  CC=1T0L 
2030  C*=MID*(IN*,CC, 1> 

2040  IF  CS="  "ORCC=LTHENCOM*=COM*+C 
% : GOSUB  3000 

2050  COM*=COM$+CS:NEXTCC 
2060  RETURN 
2080  : 

3000  REM - EVALUAR - 


.69 
.  127 
.83 
.29 

.90 
.78 
.  16 
.229 


3010  FAST : C=0  .195 

3015  IF  R I GHT * ( COM$ , 1 ) = "  "THEN  COM*  .136 
=LEFT* ( COM* , LEN ( COM* ) - 1 ) 

3020  IF  COMS=TBL*(C)THEN  3050  .63 

3030  C=C+1 x IFC<25  THEN  3020  .169 

3040  SLOW:  GOSUB4000: REM  PROCEDUREs  G  .109 
OTO3100 

3050  SLOW  . 35 

3051  IF  C=17  THEN  GOSUB 1 3500 : G0T031  .204 
00 

3052  I FC=- 1 THEN3 1 00  .217 


3053  QNC+ 1 GOSUB5000 , 5500 , 6000 , 6500 ,  .166 
7000 , 7500 , 8000 , 8500 , 9000 , 9500 , 1 0000 
, 10500,11000,11500,12000,12500,1300 
0,13500,14000,14500,15000, 15500,160 
00 , 1 6500 , 1 7000 , 1 3000 

3060  SPRSAV  TR*(ABS(INT(AN/10> > > ,1:  .3 
MOVSPR 1 ,CX+OX+ 14, CY+OY+39 

3100  C=0: COM$=" " : C$=" " : RETURN  .134 

3110  :  .26 

4000  REM - PROCEDI MENTS - .99 

4005  JL*=IN$:TR=NR:TG=K  .124 

4010  PE=— 1 : FORX=0TOPC: IF  PRS(X,0>="  .141 
TO  "+COM*  THEN  PE=X 

4020  NEXTX* IFPE=-1 THENPR INT" C RVSON D  .61 
THERE  IS  NO  PROCEDURE  NAMED  "IN*"CR 
VS0FF3 " s  LI=LI  — 1 x IN^=" " : C=-l s  GOTO407 
0 

4030  RP=1  .235 

4040  IF  PR*(PE,RP)="END"THEN  4060  .107 

4050  I N$=PR$ ( PE , RP ) : GQSUB2000 : RP=RP  .207 
+  1 í  GOTO4040 

4060  INS=JLt:NR=TR:K=TG  .221 
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4070  RETURN  . 47 

5000  REM - FGRUARD - .  123 

5010  NU*«""i CC-CC+1  -253 

5020  N*-MID*(IN*,CC,1)  .57 

5030  IF  N$<>"  "AND  CC< -LTHEN  NU*=NU  .183 
*+N*x  CC-CC+1 i  GOT 05020 

5031  IF  LEFT* (NU* ,1)*": "THEN  DC=0:F  .102 
0RX-2T0LEN  (NU*)  *  DC-DC+ASC  (MID*  (NU*, 

X,  1)  )  xNEXTXx DC-INT (DC/  (X— 1 )  )  i  NU=VA  ( 

DC) s  GOTQ5050 


5040  NU-VAL (NU*)  .255 

5050  Cl— CX+SIN (AN*tPI 3/ 180) *NU  .235 

5060  C2— CY— COS ( AN*  C  P I 3 / 1 80 ) *NU  .187 

5065  IF  SK*— " UP " THEN5080  .214 

5066  I FC 1  <  - 1 59THENC 1  — —  1 59  .37 

5067  IFC1  >159THENCl=a159  .180 

5068  I FC2  >60THENC2— 60  .29 

5069  IFC2<-60THENC2— 60  .48 

5070  DRAW1  , CX+OX  , CY+OY  TO  C1+0X,C2+  .81 

OY 

5080  CX=ClxCY«C2  .183 

5400  RETURN  .103 

5500  REM - BACK - .99 

5510  NU*=""x CC-CC+1  .243 

5520  N*=M I D* ( I N* , CC , 1 )  .47 


5530  IF  N*<  >"  "AND  CC< -LTHEN  NU*=NU  .239 
*+N*x CC-CC+1 x GOTO5520 

5531  IF  LEFT*(NU*,1)=": "THEN  DC=0:F  .132 
0RX-2T0LEN (NU*)  :  DC-DC+ASC  (MID*  (NU*, 

X, 1) ) xNEXTXx DC-INT (DC/ (X-l) ) : NU-VA ( 

DC) SGOTO5550 


5540  NU-VAL (NU*) *(-l)  .51 

5550  Cl— CX+SIN (AN+CPI 1/ 180) *NU  .225 

5560  C2— CY-COS ( AN*  C  P 1 1 / 1 80 ) *NU  .177 

5565  IF  SK*- " UP " THEN5580  .108 

5566  IFC1<-159THENC  1  —  159  .27 

5567  I FC 1 > 1 59THENC 1—1 59  .170 

5568  I FC2  >60THENC2— 60  . 19 

5569  IFC2<— 60THENC2— — 60  .38 

5570  DRAW1 , CX+OX, CY+OY  TO  C1+0X,C2+  .71 
OY 

5580  CX-INT(Cl) sCY-INT(C2)  .127 

5900  RETURN  . 93 

6000  REM - RIGHT - .169 

6010  NU*— " " i CC— CC+ 1  .233 

6020  N*=M I D* ( I N* , CC , 1 )  .37 


6030  IF  N*<  >"  "AND  CC<=LTHEN  NU*=NU  .195 
*+N*x  CC-CC+1 x GOTO6020 

6031  IF  LEFT*(NU*,l)-"s "THEN  DC=0:F  .86 
OR X -2T0LEN ( NU* ) x  DC-DC+ASC ( M I D* ( NU* , 

X, 1) ) sNEXTX:DC-INT(DC/ (X-l) ) s NU-VA ( 

DC) IGOTO6050 

6040  NU-VAL (NU*)  .235 

6050  AN-AN+NU  . 103 

6060  IF  AN>360  THEN  AN-AN-360: G0T06  .155 
060 

6070  RETURN  .  7 

6500  REM - LEFT - .29 

6510  NU*— " " x  CC— CC+ 1  .223 

6520  N*-M I D* ( I N* , CC , 1 )  .27 

6530  IF  N*<  > "  "AND  CC<-LTHEN  NU*=NU  .251 
♦+N*i CC-CC+1 x  GOTO6520 

6531  IF  LEFT* (NU*, l)»"x "THEN  DC=0xF  .116 
ORX— 2T0LEN (NU*) i DC-DC+ASC (MID* (NU*, 

X,l) ) xNEXTXiDC-INT(DC/(X-l) ) : NU-VA ( 

DC) XGOTO6550 


6540  NU-VAL (NU*)  .225 

6550  AN-AN-NU  .221 

6560  IF  AN<0  THEN  AN-AN+360: G0TQ656  .161 

0 

6570  RETURN  . 253 

7000  REM - PENUP - .223 

7010  SK*-"UP"x RETURN  .223 

7500  REM - PENDOWN - .115 

7510  SK*-"DOWN"x RETURN  .29 

8000  REM - PRINT - .137 

80 1 0  VA*— " " x  CC-CC+ 1  .  65 

8020  N*— M I D*  < I N* , CC , 1 ) i  I FN*— " C " THEN  .201 


I-lxN*-"" 

8025  I FN*— " D " THEN I =0  x  N*= " "  . 132 

8026  IF  1-1  THEN  VA*-VA*+N*x CC-CC+ 1  .39 
i GOT 08020 

8030  IF  N*<>"  "AND  CC<— LTHEN  VA*- VA  .151 
*+N*x CC-CC+1 i GOTO8020 

8040  IF  LEFT  * ( VA* , 5 ) — " PROCS "  THEN  8  .223 
120 


8041  IF  LEFT* (VA*, 1 ) < >" x "THEN8100  .220 

8045  CD— 0x FORX— 2T0LEN ( VA*) x CD— CD+AS  .220 
C (MID* (VA* , X , 1 ) ) x  NEXT x  CD-I NT (CD/ (X- 
1)  ) 

8050  CV-VA(CD)  .27 

8080  CV*— VA*-*- "  -  "  +STR*  ( CV )  i  G0T08 110  .1 

8100  CV*— VA*  .117 

8110  PRINTCV*! RETURN  .13 

8120  IF  VA*— " PROCSL I ST "  THEN  0PEN4 ,  .249 

4 , 7  x  CMD4 

8121  PR I NT " C  CLR  3  C  RVSON 1 DEF I NED  PROC  .194 
EDURES  í RVSOFF  3 " 

8125  FORX-0  TO  PC- 1 x 00-0: CMD4x PRINT  .144 


8130  CMD4  x  PR I NTPR* ( X , 00 ) x I FPR* ( X , 00  .107 
) <  > " END " ANDPR* ( X , 00 ) <  > " EMPTY " THENOO 
—00-*- 1 1  G0TQ8 1 30 

8135  GETKEYX*x  CMD4x  NEXTX  .22 

8136  I FVA*-" PROCSL IST" THEN  PRINT#4x  .237 
CL0SE4 

8140  RETURN  .37 

8500  REM - REPEAT - .113 

8510  TC*-H  "  :  NR*« "  "  :  CC— CC-*-l  .217 

8520  N*— MI D* ( IN* , CC , 1 )  .243 

8530  IF  N*<  >"  "AND  CC< -LTHEN  NR*=NR  .71 
*+N*x  CC-CC+1 1 GOTO8520 

8540  IF  LEFT  * ( NR* , 1 ) <  > " x " THEN8600  .41 
8550  DC— 0:  FORX— 2T0LEN  (NR*)  :  DC— DC-*-AS  .39 
C (MID* (NR* , X , 1 ) ) x  NEXTX : DC-INT (DC/ (X 
-1) ) iNR-VA(DC) 

8560  GOTO  8610  .15 

8600  NR-VAL (NR*)  .217 

8610  CC-CC-1  .87 

8611  IF  M I D* ( I N* , CC , 1 ) <  > " C " THENCC-C  .106 
C+l x  G0TQ861 1 

8615  CC-CC+1  .220 

8620  IF  M I D*  ( I N*  ,  CC  ,1)0"  3"  THENTC*—  .97 
TC*+MID*(IN*,CC, 1) x CC-CC+1 x GOTO8620 
8630  FORK-lTONRx IN*-TC*x LL-NRx  ZK-Kx  . 185 
GOSUB2000X  NR-LLx K-ZKx  NEXTK 
8640  RETURN  . 27 

9000  REM - SETXY - .61 

9005  IN— 0  .26 

9010  NU*-" "x CC-CC+1  .173 

9020  N*-M I D* ( I N* , CC , 1 )  .233 


9030  IF  N*< > "  "AND  CC< -LTHEN  NU*=NU  .233 
*+N*i CC-CC+1 i GOTO9020 

9031  IF  LEFT  * ( NU* , 1 ) — " * " THEN  DC-0xF  .38 
0RX-2T0LEN (NU*) x  DC-DC+ASC (MID* (NU* , 

X,l) ) xNEXTXx DC-INT (DC/ (X-l) ) x NU-VA ( 

DC) «GOTO9050 


9040  NU-VAL (NU*)  .175 

9050  I F I N— 0THEN I N— 1 x  N 1 -NU : GOTO90 1 0  .135 

9060  N2-NU  . 159 

9070  IF  SK*- " UP " THEN  9090  .11 

9071  I FN 1 <  —  1 59THENN 1 — - 1 59  .138 

9072  IFN1 >159THENN 1—159  .237 

9073  I FN2  >60THENN2— 60  .64 

9074  I FN2< -60THENN2--60  .105 

9080  DRAM 1 , CX+OX, CY+OY  TO  N1+QX,N2+  .167 
OY 

9090  CX-N1 x  CY-N2  .43 

9400  RETURN  . 22 

9500  REM - ERASE - .39 

9510  NP*— R I GHT * ( I N* , LEN ( I N* ) -5 )  :  PB—  .101 
-1 

9520  FORW-0  TO  PC  .221 

9530  IF  PR*(W,0)-"TO"+NP*THEN  PB-W  .55 
9540  NEXTW  .45 

9550  IFPB— 1  THEN  PRINT"  C RVSON I PROC  .177 
EDURE  ÑAME  NOT  FOUND" : GQTO9570 
9560  FORW-PB  TO  PCx FORS-0TO30X PR* (W  .83 
,8) — PR* (W+l , S) x NEXTSx  NEXTW x  PC-PC— 1 


Commodore  World  /43  — ' 


9570  LI=LI-lx  IN**""xCC=L+l  .27 

9600  RETURN  . 223 

10000  REM - MAKE - .151 


10005  N=0  .16 

10010  VA*= " " i CC=CC+ 1  .25 

10020  N*=MID*(IN*,CC,l)xIFN*="("THE  .213 
NI*1  x  N*="  M 

10025  I  FN*=  "  )  " THEN I  =0 1  N*=  "  "  .66 

10026  IF  1=1  THEN  VA*=VA*+N*x CC=CC+  .31 
li GOTO 10020 

10030  IF  N*<>"  "AND  CC<=LTHEN  VA*=V  .237 
A*+N* i CC*CC+ 1  *  GOTO 1 0020 

10040  Nl*=""xCC=CC+l  .151 

10050  N*=MID*(IN*,CC,  1)  i  IFN*<>"  "AN  .211 
DCC<=LTHEN  N1*=N1*+N*x  CC=CC+1 x  GOTO 
10050 

10055  IF  Nl*="7"  THEN  INPUT  Nl*xGOT  .124 
010060 

10056  IF  LEFT*(Nl*,l)="i"THEN  GOSUB  .93 
40000 

10060  CD=0:FORX=1TOLEN(VA*) x CD=CD+A  .193 
SC  ( M I D* ( VA*  ,  X,  1)  )  i  NE X T 

10070  CD=INT(CD/X) xVA(CD)=VAL(Nl*)  .99 
10100  RETURN  .213 

10500  REM - SAVE - .211 


10510  INPUT" C RVSON 3FI LE  ÑAME C RVSOFF  .127 
3 " l NOM* 

10511  PR I NT " 1 . PROCEDURES  C  4SPC  32.1 NM  .90 
EDI AT  I NSTRUCT I ONS  3.PR0C  Se  INSTRUC 

T I GNS . " *  GETKEYA* : A=VAL ( A*  >  x I FA< 1 ORA 


>3THEN1051 1 

10520  IFLEN(NOM*> >9THENN0M*=LEFT* <N  .125 
0M*,9) 

1 0530  NOM*= " LG  > " +NOM*  .  1 1 

10535  SCRATCH  (NOM*>  .188 

10540  DOPEN#10, (NOM*) , D0,U8,W  .129 

10541  PRINT#10 , A  .28 

10545  IF  A=1 THEN 10555  .126 

10549  PRINT#10,LI  .140 

10550  F0RX*1T0LI x  PRINT#10 , IN* (X ) s  NE  .161 
XTX 

10551  IF  A=2THEN1 0560  .128 

10555  PRINT#10,PCxFORX=0TOPCxFORY=0  .8 
TO30xPRINT#10,PR*(X,Y) iNEXTYxNEXTX 
10560  DOLOSE# 10  .65 

10570  PRINTDS*xLI=LI-l  .117 

10600  RETURN  .203 

11000  REM - READ - .28 


11010  I NPUT " C  RVSON  3  F I LE  ÑAME  t  RVSOFF  .117 
3 " | NOM* 

11020  IFLENÍNOM*) >9THENN0M*=LEFT* (N  .115 
0M*,9) 


11030  NOM*= " LG > " +NOM*  .  1 

11040  DOPEN#10, (NOM*) ,D0,U8  .203 

11041  I NPUT  #10, T YPE  .14 

11045  IF  TYPE=1  THEN  11055  .52 

11046  INPUT#10,LI  .47 

11050  FORX=lTOLIx INPUT#10, IN*(X> s IF  .89 
DS<  20THENNEXTX 

11051  IF  TYPE-2THEN  11060  .24 


11055  INPUT#10 ,  PC*  FORX*0TOPCx  FORY=0  .18 
TO30I I NPUT #10, PR* ( X  ,  Y ) s I FDS<  20THENN 
EXTYi NEXTX 

11056  I FD  V*= " T " THENCLOSE 1 0 : L I =L I - 1 i  .153 
G0T01 1 100 

1 1 060  DOLOSE# 1 0 i L I — L I — 1  .181 

11070  PRINTDS*  .171 

11100  RETURN  .193 

11500  REM - CATALOG - .78 


11505  SPRITE1 , 0  .247 

11510  GRAPH 1 00 1 PR I NT " C 2H0M  3  L CLR  3 " «  C  .62 
ATALOG"LG>*" 

11515  GETKEYS*!  SPRITE1 , 1  .233 

11520  GRAPH 1 02 ,  0 , 1 6 1 W I NDOW  0,16,39,  .53 
24 , 1 

11600  RETURN  .183 

12000  REM - ERASEFILE - .34 


12010  INPUT" CRVS0N3FILE  ÑAME C RVSOFF  .96 
3 " | NOM* 

12020  IFLEN(NOM$) >9THENN0M*=LEFT* (N  .94 
0M«,9) 


12030 

NOM*«"LG>" 

+NOM* 

.236 

12031 

PRINT "ARE 

YOU  SURE7* 

'  x  GETKEYCO  .115 

*x IFCO*»"N"THEN 

12400 

12035 

SCRATCH  <NOM*> 

.  158 

12400 

RETURN 

.218 

12500 

REM - 

- START— 

- .62 

12505  TX=CX : TY=CY: TA=AN: CX=0: CY=0s  A 
N=0 

12506  GRAPH I 02 ,1,16 
12510  F0RZ=1  TO  L I 

1 2520  PR I NT " C  RVSON  3  >  C  RVSOFF  3 " I N* ( Z ) 
12530  IN*»IN*(Z> x IF  I N$= " ST ART " THEN 
12550 

12535  GOSUB  2000 

12536  SPRSAV  TR* ( INT ( AN/ 10) ) , 1 s MOVS 
PR1 , CX+OX+14 ,CY+0Y+39 

12540  NEXTZi CX-TXi CY=TYi AN-TAi LI=LI 
-1 

12550  RETURN 

13000  REM - DRAM - 

13010  GRAPH 102, 1,16 

13020  PR I NT " C  RVSON  3  SCREEN  OLEAR CRV5 
OFF  3 " i SLEEP2 

13025  IN*=""«CC=L:LI=LI-1 
13030  RETURN 

13500  REM - NEW - 

13510  L I =0 z  PR I NT " L RVSON 3 NEW  ALL  INS 
TRUCTIONS  ON  MEMORY  C  RVSOFF  3 " i SLEEP 
3 

13515  IN*»""«CC=L 
13520  RETURN 

14000  REM - DEF  PROC - 

14005  NL=LI 

14010  NP*=MID*(IN*,6,LEN(IN*>-5) 

14015  FORX=0TOPCi IFPR* ( X , 0) ="T0  "+N 
P*  THEN  PR I NT " PROCEDURE  PREDEFINED. 
REWR I TE ( S/N ) " x  GETKEYA*  s I FA*= " N " THEN 
14400 

14016  NEXTX 

14020  PRINT" CCLR3T0  "NP^ 

14030  GOSUB  10001 IF  I N$<  > " END "  THEN 
14030 

1 4040  FORQ=NL+ 1 TOL I i PR* ( PC , Q-NL ) = I N 
* (Q) i NEXTQx  PR* (PC , 0) ="TQ  "+NP* 

14050  PR*  ( PC ,  Q )  =  "  END  "  :  PC=PC-*- 1 
14060  PRINT" C RVSON 3 PROCEDURE  DEFINE 
DC RVSOFF 3" 

14070  L I =NL— 1 i GOTQ300 
14400  00*0 1 PR I NT " C CLR  3 " 

14410  PRINTPR* ( X ,00) « IFPR* ( X , 00) < >" 

END " THEN00-00+ 1 x  GOTO 14410 

14420  L I =NL— 1 x  GOT 0300 

40000  REM - EVALUAR  EXPRESS I ONS 


40001  FAST  .3 

40005  N 1 **R I GHT * ( N 1 * , LEN ( N 1 * ) — 1 )  .19 

40010  CD=0xFORS*lTOLEN(Nl*> x CD=CD+A  .212 
SC (MID* (Nl*,S,l))x  NEXT  x  CD=INT (CD/S) 
xNl*VA(CD) 

40020  CC*CC+ 1 x  OP*=M I D* ( I N* , CC , 1 )  .216 

40030  CC-CC+2 i N2*« " "  .1 28 


40040  K*=M I D* ( I N* , CC , 1 ) i  I FK*<  > "  "AN  .190 
D  CC<*LTHEN  CC*CC+1 i N2*=N2*+K*: GOTO 
40040 

40050  IF  LEFT *  < N2* , 1 ) = " x " THENCD=0 x  F  .82 
0R8-2T0LEN ( N2* ) i CD=CD+ASC ( M I D* ( N2* , 

S, 1) ) x NEXTx CD=INT(CD/ (S-l ) ) x N2=VA (C 
D) i GOT 04 0060 

40055  N2=VAL(N2*>  .19 

40060  I FOP*= " * " THEN  RE=Nl*N2x GOTO40  .176 
100 

40070  IFOP*="-*-"THEN  RE=N1+N2x  GOTO40  .186 
100 

40080  I FOP** " — " THEN  RE=N1-N2: GOTO40  .200 

100 

40090  I FOP*= " / " ANDN2<  >0THEN  RE=N1/N  .58 
2x  GOTO40100 

40095  I FOP** " / " ANDN2=0THENPR I NT " C  RV  .179 
SON 3 LOGO  ERROR x  DIVISION  BY  ZEROCRV 
S0FF3" 

40100  N1*=STR* (RE) xSLOWx RETURN  .190 

50000  PRINTERR*(ER) jELx RESUME  300  .43 


.  143 

.58 

.93 


.  194 
.60 
.26 

.238 

.242 
.  128 

.248 
.  142 
.74 

.88 

.228 


.57 

.218 
.210 
.  180 
.42 

.5 
.  48 

.242 

.  113 
.  136 

.212 

.  120 

.231 

.82 

.96 

.0 


.241 

.62 

.20 
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el  C-16,  el  pequeño  de  la  familia 
.  n0  tiene  teclado  numérico 

,eño  y Program! 
i—  «“  „  del 


F 

1  M  ste  programa  con- 
M  vierte  la  parte  dere- 
cha  del  teclado  en 
un  teclado  numé¬ 
rico,  para  trabajar  más  rápido  cuando 
tengamos  que  teclear  largas  líneas  de 
DATAS  (decimales  o  hexadecimales). 

Después  de  ejecutar  el  programa,  que 
se  carga  en  el  buffer  del  cassette,  si 
tecleamos  SYS  819  la  rutina  queda 
conectada  al  sistema  operativo  (de 
hecho  no  hace  falta  teclearlo  porque  el 
programa  Basic  se  encarga  de  ello).  Esto 
quiere  decir  que  durante  las  interrup¬ 
ciones  IRQ  (ver  número  10  de  Commo- 
dores  World,  pág.  70)  se  ejecuta  nuestra 
rutina  como  parte  correspondiente  a  la 
de  decodificación  del  teclado. 

Para  activar  el  teclado  numérico  hay 
que  pulsar  simultáneamente  SHIFT  y 
CONTROL.  Veremos  que  el  borde 
cambia  a  color  blanco,  como  indicador 
de  que  estamos  en  el  nuevo  teclado. 
Entonces  el  teclado  queda  definido  de  la 
siguiente  manera: 

Todas  las  teclas  redefinidas  tienen 
repetición  a  excepción  de  la  tecla  “N” 
que  contiene  la  palabra  DATA. 

Funcionamiento  de  la  rutina 

Las  direcciones  utilizadas  las  conse¬ 
guí  gracias  a  un  amigo  que  vive  en 
Argentina;  tiene  un  plus/4,  me  mandó 
una  parte  del  mapa  de  memoria  de 
dicho  ordenador  y  coinciden  bastante, 
las  direcciones,  aunque  hay  algunas  que 
no  son  iguales  para  ambos. 

El  programa  en  sí  va  desde  $0333 
hasta  $03C8  (819-968).  Desde  $03 A2 
hasta  el  final  son  datos  que  necesita  el 
programa.  Consta  de  tres  partes  bien 
diferenciadas: 

1.  Conexión/desconexión  de  la  rutina 

($0333-$034C) 

Se  establecen  las  interrupciones  debi¬ 
do  a  que  se  va  a  cambiar  un  vector  por 
el  que  el  ordenador  pasa  60  veces  por 
segundo.  Si  no  desabilitamos  las  inte¬ 
rrupciones  con  SE1  probablemente  no 
pasará  nada,  pero  en  alguno  de  los 
momentos  en  que  accedamos  a  la  rutina 
podríamos  colgar  el  ordenador. 

$0334-$033A.  Se  comprueba  si  el 
contenido  de  $0545  y  $0546  (vector 
rutina  de  decodificación  del  teclado) 
apunta  a  nuestra  rutina.  Para  ello  es 
suficiente  testear  un  solo  byte. 

$033B-$0340.  Se  almacena  la  direc¬ 
ción  de  la  rutina  en  el  vector  si  su  conte¬ 
nido  anterior  apuntaba  a  la  rutina  de 
decodificación. 

$0341 -$0344.  Se  almacena  la  direc¬ 


ción  de  la  rutina  de  decodificación  en  el 
vector.  Ambos  almacenamientos  ocu¬ 
rren  en  $0345-$034A.  Esto  significa  que 
si  tecleamos  nuevamente  SYS  819, 
queda  inhabilitado  el  teclado  numérico. 

2.  Activación/desactivación  de  la  rutina 

($034D-$0370) 

Aquí  se  chequea  si  hemos  pulsado 
SHIFT  y  CONTROL. 

$034D.  Se  carga  el  registro  X  con  el 
contenido  de  $0543.  Esta  dirección  es 
empleada  por  la  rutina  de  decodifica¬ 
ción  (almacenada  en  ROM)  para  ver  si 
se  ha  pulsado  alguna  tecla  con/sin 
SHIFT.  Si  contiene  un  5  (1+4  = 
SHIFT  +  CONTROL),  significa  que  se 
han  pulsado  ambas  teclas.  Se  obtienen 
otras  combinaciones  si  se  pulsan  otras  de 
las  teclas  de  control.  Si  no  se  han  pul¬ 
sado  SHIFT  y  CONTROL  y  no  esta¬ 
mos  en  modo  numérico,  se  salta  a  la 
rutina  normal  de  decodificación. 

$0354.  Se  comprueba  si  SHIFT/ 
CONTROL  sigue  pulsado  todavía;  si 
lo  está,  se  salta  a  la  rutina  normal. 

$0359-$0368.  Se  cambia  el  indicador 
para  ver  si  está  conectado  el  teclado 
numérico  y  el  color  del  borde.  $FF19  - 
bits  0-3  son  el  color  del  borde,  bits  4-6  la 
luminancia  y  el  bit  7,  que  no  se  utiliza, 
está  a  1. 

$0369.  Se  almacena  el  contenido  de 
X  (si  se  han  pulsado  o  no  SHIFT/CON- 
TROL)  en  una  posición  para  hacer  la 
comprobación  de  la  dirección  $0354. 

$036C-$0370.  Se  comprueba  si  es¬ 
tamos  en  modo  numérico. 


3.  Rutina  de  conversión  ($0371-$039F) 

Esta  rutina  se  encarga  de  cambiar  la 
tecla  pulsada  por  la  del  “nuevo  teclado”. 

$0371.  Carga  el  acumulador  con  el 
código  de  la  tecla  pulsada  (no  es  ASCII 
ni  de  pantalla).  Para  más  información 
ver  Commodore  World  27,  pág.  18. 
“Exploración  del  teclado”. 

$0373.  El  registro  Y  se  utiliza  con 
una  dobla  función:  indicador  para  ver  si 
se  ha  pulsado  dos  veces  la  palabra 
“DATA”  y  como  contador  para  sacar 
por  pantalla  la  palabra  “DATA”. 

$0375-$037E*  Se  comprueba  si  se  ha 
pulsado  una  tecla  perteneciente  al 
teclado  numérico. 

$037F*  Es  un  salto  forzado. 

$0381 -$0389*  Se  carga  el  acumula¬ 
dor  con  el  código  de  la  tecla  que  apare¬ 
cerá  en  la  pantalla.  El  truco  consiste  en 
almacenar  en  el  acumulador  un  código 
distinto  al  de  la  tecla  pulsada,  para  que 
cuando  llamemos  a  la  rutina  de  decodi¬ 


ficación  nos  aparezca  una  letra  (carác¬ 
ter)  distinto. 

$038A.  Se  comprueba  si  se  ha  pul¬ 
sado  dos  veces  la  “N”  (la  palabra 
“DATA”). 

$038F-$0397.  Se  envía  la  palabra 
“DATA”  a  la  pantalla  a  través  del 
almacenamiento  de  los  códigos  ASCII 
en  el  buffer  del  teclado.  Esto  se  hace  por 
la  llamada  a  la  subrutina  ubicada  en 
$DC  1 E  ($EF  es  el  número  de  caracteres 
en  el  buffer,  $053F  el  número  máximo 
de  caracteres,  que  actúa  como  cons¬ 
tante). 

$0398-$03AL  Se  carga  el  acumula¬ 
dor  con  $40  (perteneciente  al  código  de 
operación  nula  — ver  “Exploración  del 
teclado”)  y  se  almacena  un  flag  para 
ver  si  se  ha  pulsado  anteriormente  la  tecla 
“N”,  y  se  almacena  en  el  acumulador  el 
código  de  la  tecla  que  queremos  que 
salga  por  pantalla.  Finalmente  se  salta  a 
la  rutina  normal  de  decodificación  del 
teclado,  que  se  encarga  de  sacar  el 
carácter  por  pantalla,  etc. 

Hay  que  tener  en  cuenta  que  nuestra 
rutina  se  ejecuta  60  veces  por  segundo, 
no  cuando  pulsamos  SHIFT  y  CON¬ 
TROL. 

Un  pequeño  programa 

A  continuación  tenéis  el  listado  2,  que 
es  un  programa  generador  de  datas.  Es 
muy  sencillo  de  utilizar;  nos  transforma 
en  líneas  DATA  un  contenido  especí¬ 
fico  de  la  memoria,  después  de  decirle  la 
dirección  inicial,  final,  línea  inicial, 
incremento,  número  de  datas  por  línea  y 
si  queremos  suma  de  control  (aparece  al 
final  de  cada  línea  un  valor  igual  a  la 
suma  de  las  datas  de  esa  línea).  Hemos 
de  limitarnos  a  los  valores  comprendi¬ 
dos  entre  paréntesis.  Se  utiliza  la  técnica 
del  teclado  dinámica,  explicada  en  el 
número  33  de  Commodore  World,  pag. 
18. 

El  programa  está  adaptado  del  que 
apareció  en  la  sección  “Mejorando  lo 
presente”  del  número  21.  Utiliza  para  el 
almacenamiento  temporal  de  datos  el 
buffer  del  cassette,*  por  lo  tanto  si  que¬ 
réis  convertir  un  programa  en  código 
máquina  ubicado  en  el  buffer  de  casse¬ 
tte  (como  podría  ser  el  teclado  numé¬ 
rico)  hay  que  cargar  primero  el  genera¬ 
dor  de  datas,  cambiar  las  direcciones  del 
buffer  por  otras  y  escribir  el  programa 
cm  a  través  del  monitor  (o  cargarlo  de 
disco/ cinta).  Una  vez  en  memoria,  se 
ejecuta  el  programa  generador  y  al 
final  sólo  quedan  las  líneas  DATA, 
dado  que  el  programa  generador  se 
autodestruye.  ■ 
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DIB.  1.  TECLADO  NORMAL 
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DIB.  2.  TECLADO  NUMERICO 
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:  zona  de  utilización 
teclas  que  define  la  rutina 


PROGRAMA:  NUMKEY  C-16 

3  REM  ***  TECLADO  NUMERICO  *** 

10  FOR  A-019  TO  968 
20  READ  DiS-8+D 
30  POKE  A, Di NEXT  A 
40  PRINT  CHR*< 147>i 

30  IF  8014086  THEN  PRINT  -ERROR  EN  DATA 
8. M « END 
60  8Y8  819 

100  DATA  120,173,70,3,201,3,240,6,162,77 

,160,3,208,4,162,122,160,219 

110  DATA  142,69,3,140,70,5,88,96,174,67, 

3,224,3,208,21 ,236, 198,3 

120  DATA  240,70,173,199,3,73,120,141,199 

,3,173,23,253,73,31 ,141,25,233 

130  DATA  142,198,3,173,199,3,16,46,163,1 

98,160,3,162,14,221 , 162,3,240 

140  DATA  5,202,16,248,48,23,189,177,3,22 

4,0,240,2,208, 16,204,200,3 

150  DATA  208,14,183,192,3,32,30,220,136, 

16,247,169,64, 140,200,3,133,198 

160  DATA  76,122,219,39,36,53,34,37,42,45 

,30,30,33,38,41,7,33,48 

170  DATA  64,33,1,56,39,8,10,28,11,16,19, 

20,18,14,21,32,63,84 

180  DATA  63,68,32,0,0,5 


DESENSAMBLADO  DE  LA  RUTINA  ‘NUMKEY” 

c* 

PC  IRQ  SR  AC  XR  YR  8P 
. | ADD4  EA31  B1  BD  FF  03  F8 
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PROGRAMA:  DATAGEN  C-16 

0  REM  ***  DATAGEN  *** 

2  PRINT  H CCLRD - 

4  INPUT  -DIRECCION  INICIAL  (0-65335) M | I 1 
A-IiD-818* GOSUB  46 

6  INPUT  -DIRECCION  FINAL  (0-63333) M | Fi IF 
F< A  THEN  61EL8E  A-F« D-8201 QOSUB  46 
8  INPUT  -LINEA  INICIAL  ( >48) " j LI 1 A-LI 1 D« 
822 1 B08UB  46 

10  INPUT  -INCREMENTO  ENTRE  LINEAS- | 81 A»S 
1 D»824i GOSUB  46 

12  INPUT  -DATAS  POR  LINEA  (< 19) " | DLi POKE 
826, DL 

14  PRINT  -SUMA  DE  CONTROL  (S/N) " 1 GETKEY 
A4 1 POKE  827 , — ( A4«"S" ) 

16  D«818i GOSUB  48 1 I «Ai D-8201 GOSUB  48iF-A 
iD-8221 GOSUB  48iLI«A 

18  PRINT  " C BLK 1 C CLR 3  C 3CRSRD 3 " M I D4 ( STR4 ( L 

I)  ,2) M  DATA  "| 

20  FOR  J-0  TO  PEEK (826) — 1 
22  IF  I+J-F+l  THEN  28 

24  C-C+PEEK ( I+J ) 1 PRINT  MID4 (BTR4 (PEEK ( 1+ 

J) ),2)",-| 

26  NEXT 

28  PRINT  -CCR8RL3  "|iIF  PEEK (827)  THEN  P 
RINT  -CCR8RL3,-MID*(8TR*(C) ,2)| 

30  IF  I+J-F+l  THEN  38 

32  PRINT  CHR4(13> "CWHTDGOT016CHOM3" 

34  I"I+PEEK (826) 1 A«I 1 D«818i GOSUB  46 
36  D-8241 GOSUB  48 1 LI-LI+Ai A-LI 1 D«822i GOS 
UB  46i BOTO  40 

38  PRINT  CHR4 (13) "DELETE  0-48CHOM3" 

40  GOSUB  44 
42  END 

44  POKE  239 , 2 1 POKE  1319,13iP0KE  1320, 13i 
RETURN 

46  POKE  D+l  f  INT  (A/256)  1  POKE  D,  A  AND  255i 
RETURN 

48  A-PEEK(D)*256*PEEK(D+l)i RETURN 
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Punto  y  coma  ¿para  qué? 


Imprimir  comillas 


Una  mejor  que  dos 


Coma  tras  coma 


Palabras  mágicas  en  los  REM 


Trucos  en  los  comentarios 
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En  la  sentencia  PRINT  puedes  ahorrarte 
los  punto  y  coma  en  la  mayoría  de  las  oca¬ 
siones.  Una  sentencia  como  PRINT  “HO- 
LA”;A$  puede  quedarse  en  PRINT  “HO- 
LA”A$.  También  puedes  hacerlo  con  varia¬ 
bles:  PRINT  A$B$C$A  imprimirá  A$,B$,C$ 
y  A.  Ten  cuidado  de  que  no  se  confundan  los 
nombres  de  las  variables;  si  quisieras  impri¬ 
mir  AB  y  CD$  y  haces  PRINT  ABCD$  se 
imprimirá  el  valor  de  ABCD$  (AB$,  pues 
sólo  se  tienen  en  cuenta  los  dos  primeros 
caracteres).  En  este  caso  tendrás  que  utilizar 
el  punto  y  coma  obligatoriamente. 


/  f  f 


Y 

•  h 


Si  alguna  vez  has  intentado  imprimir  unas 
comillas  mediante  el  comando  PRINT, 
habrás  observado  que  es  imposible.  Si  haces 
PRINT““  no  aparece  nada,  y  si  incluyes 
texto  entre  medias  pueden  aparecer  todo  tipo 
de  errores.  La  solución  es  la  siguiente:  utiliza 
la  expresión  CHR$(34).  Una  línea  así  queda¬ 
ría:  PRINT  “PULSA  LA  TECLA  ”;CHR$ 
(34);“A”;CH  R$(34);“  PARA  SEGUIR”.  Co¬ 
mo  sabrás,  no  es  necesario  poner  los  puntos  y 
comas,  a  menos  que  hagas  el  PRINT  con 
variables  que  puedan  provocar  errores.  Ten 
en  cuenta  que  al  imprimir  un  CHR$(34) 
entras  en  modo-comillas,  y  no  podrás  hacer 
movimientos  con  el  cursor  hasta  que  las  cie¬ 
rres  de  nuevo.  Es  muy  común  utilizar  tam¬ 
bién  el  apostrofe,  aunque  no  quede  igual  de 
bien. 
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Cuando  utilices  un  PRINT  literal  (una 
expresión  entre  comillas)  puedes  omitir  las 
comillas  de  cierre.  De  este  modo  una  línea 


como: 

10  PRINT  “PRUEBA” 
quedaría  como 

10  PRINT  “PRUEBA 
El  resultado  es  el  mismo,  no  se  produce 
ningún  error  y  ahorras  un  byte  de  memoria. 
Ten  en  cuenta  que  esto  sólo  puedes  hacerlo  al 
final  de  la  línea.  Si  estás  utilizando  la  rutina 
correctora  “PERFECTO”  aparecerá  una 
arroba  invertida  al  final  del  número  de  con¬ 
trol,  pero  no  tiene  ninguna  importancia. 


En  los  ordenadores  Commodore,  la  coma 
se  utiliza  como  tabulador.  Si  haces,  por 
ejemplo,  PRINT  A,B  ambas  variables  serán 
imprimidas  a  una  distancia  de  10  espacios 
(11  si  es  el  Vic-20).  Puedes  hacer  una  doble- 
tabulación  haciendo  PRINT  A„B  o  incluso 
bajar  una  línea  utilizando  PRINT  A„„B. 


■  mallín 


Si  en  una  sentencia  REM  tecleas  caracte¬ 
res  gráficos  tipo  COMMODORE-G,  cuando 
listes  el  programa  aparecerán  palabras  claves 
del  Basic.  Si  quieres  evitarlo  no  tienes  más 
que  incluir  el  comentario  entre  comillas. 


En  los  textos  de  las  líneas  REM  puedes 
hacer  un  montón  de  trucos  “mágicos”.  Por 
ejemplo,  si  tecleas  REM  [SHIFT  L]  al  listar 
el  programa  saldrá  un  7SYNTAX  ERROR 
cuando  llegues  a  esa  línea.  También  puedes 
teclear  (entre  comillas)  caracteres  [DEL] 
(Delete  =  borrar).  Esto  se  consigue  tecleando 


REM  “”,  borrando  la  última  comilla,  inser¬ 
tando  (SHIFT  INST/DEL)  tantos  espacios 
como  caracteres  hay  antes  del  REM  y  pul¬ 
sando  después  ese  mismo  número  de  veces  la 
tecla  INST/DEL.  Aparecerán  letras  “T”  en 
inverso.  A  continuación  puedes  teclear  lo  que 
quieras.  Cuando  listes  el  programa  verás 
como  aparece  la  línea  REM,  pero  se  borra 
rápidamente  y  en  su  lugar  aparece  tu  men¬ 
saje.  Esto  crea  una  apariencia  de  línea-sin¬ 
número-de-línea  muy  curiosa.  Puede  utili¬ 
zarse  para  ocultar  mensajes  secretos  o  partes 


de  una  línea. 

También  puedes  teclear  REM  [WHT]  o 
REM  [RVS  ON]  [SHIFT  M],  con  los  que 
puedes  conseguir  los  más  variados  efectos. 


Un  REM  siempre  es  un  REM 


En  cuanto  el  intérprete  Basic  encuentra 
una  sentencia  REM,  salta  a  la  siguiente  línea. 
De  modo  que  si  tienes  una  línea  como: 

10  PRINT  2+2:REM  SUMAR:GOTO  100 
El  GOTO  100  nunca  va  a  ejecutarse.  Hay 


otro  truco  que  consiste  en  utilizar  REMs  sin 
la  palabra  REM.  De  esta  manera: 

10  GOTO  100 

20  ESTO  ES  UN  COMENTARIO 

30  QUE  NO  NECESITA  LA  PALABRA 
REM 

40  PORQUE  EL  PROGRAMA  NUNCA 
PASA 

50  POR  AQUI 

100  ... 

O  de  esta  otra  forma,  todo  en  la  misma 
línea: 


TERCERA 

PARTE 

Este  mes 
continuamos  con 
los  pequeños 
trucos  que  hacen  más 
fácil  y  divertida 
la  programación. 

Trucos  que  puedes 
utilizar  en 
tus  programas 
y  con  los  que  podrás 
ahorrar  tiempo 
y  memoria. 


10  GOTO  1000  HOLA  AMIGOS! 

También  puede  utilizarse  con  GOSUB, 
puesto  que  al  volver  de  la  rutina,  el  intérprete 
busca  los  dos  puntos  siguientes,  no  se  fija  en 
el  comentario  y,  por  lo  tanto,  no  da  ningún 
error. 

10  GOSUB  999  HOLA  DE  NUEVO!:A=l 

El  azar  es  predecible 

Los  números  aleatorios  con  el  C-64  fun¬ 
cionan  de  una  forma  muy  curiosa.  La  sen¬ 
tencia  RND  (X)  genera  un  número  aleatorio. 
X  puede  ser  cualquier  número,  y  el  ordena¬ 
dor  distingue  tres  posibles  casos: 

*  X  =  Número  positivo.  En  este  caso  se 
genera  un  número  aleatorio  partiendo  de  una 
“semilla”  (seed)  almacenada  en  la  memoria  y 
el  número  dado.  El  último  número  generado 
se  convierte  a  su  vez  en  semilla  del  siguiente. 
Esta  es  la  razón  por  la  que  al  encender  el 
ordenador  y  hacer  PRINT  RND(l)  siempre 
salga  el  mismo  número.  Esta  secuencia  es 
aleatoria,  pero  depende  siempre  del  número 
anterior. 

*  X  =  Número  negativo.  Se  utiliza  para 
generar  “semillas”.  Da  un  número  aleatorio, 
generalmente  muy  bajo  (del  orden  de  1E-5) 
que  se  convierte  en  semilla  del  próximo 
número  RND.  Utilizando  después  números 
positivos  se  obtiene  siempre  la  misma 
secuencia  (una  posible  aplicación  es  la  gene¬ 
ración  de  claves  y  códigos  de  cifrado). 

*  X  =  0.  En  este  caso  el  número  se  genera 
a  partir  de  una  semilla  tomada  del  reloj 
interno  del  C-64. 

Podría  parecer  que  el  último  es  un  método 
verdaderamente  aleatorio  (el  primero  cier¬ 
tamente  no  lo  es),  pero  no  es  así.  Una  sencilla 
y  elegante  demostración  es  la  siguiente: 


1  POKE  1024-f  RND(0)*1 000, 160:  GOTO  1 

¡Increíble!  Este  método  no  da  todos  los 
valores  posibles  sino  que  omite  algunos. 
Digamos  que  es  como  un  dado  cargado.  Para 
conseguir  números  aleatorios  de  verdad  se 
suele  utilizar  la  siguiente  línea  al  principio 
del  programa: 

1  X=RND( — TI) 

Lo  que  hace  es  generar  una  semilla  basán¬ 
dose  en  el  reloj  (TI)  interno.  Como  TI  varía 
muy  rápidamente  y  de  hecho  no  se  repite 
nunca,  al  utilizar  después  sentencias  como 
RND(l),  con  valores  positivos,  la  secuencia 
será  entonces  aleatoria. 

Un  dado  a  nuestro  gusto 

Un  método  sencillo  para  conseguir  un 
número  aleatorio  entre  otros  dos  dados  es  la 
fórmula:  RND(1)*(B— A)+A,  donde  A  y  B 
son  los  valores  mínimo  y  máximo.  Para  los 
valores  30  y  40,  por  ejemplo,  la  fórmula  sería: 
RND(0)*(40 — 30)+30  o  bien  RND(l)*  10+30. 
Si  quieres  convertirla  a  entero  puedes  utilizar 
INT  o  bien  utilizar  una  variable  entera  para 
leer  el  valor:  N%=RND(1)*30+10,  aunque 
no  ganas  velocidad  ni  ahorras  memoria. 

Grabar  varías  veces 


Si  quieres  grabar  un  programa  varias  veces 
seguidas,  por  razones  de  seguridad,  utiliza  la 
siguiente  fórmula: 

F0RI=1T03:SAVE“PR0GRAMA”: 

NEXT 

También  puedes  añadir  el  número  de 
orden  de  la  siguientes  forma: 

FORI=IT03 

SAVE“PROGRAMA”+STR$(I):NETX 

Se  acerca  el  fin  del  fichero 


Cuando  estás  leyendo  un  fichero  secuen- 
cial,  y  no  sabes  a  ciencia  cierta  cuántos  datos 
hay  en  él,  hay  una  manera  sencilla  de  detec¬ 
tar  cuando  se  acaban  los  datos.  La  variable 
ST  se  pone  a  64  cuando  detecta  el  EOF  (End 
Of  File  =  fin  de  fichero).  No  hay  más  que 
comprobarla  después  de  hacer  GET#  o 
INPUT#. 

SYS  simplificado 


Al  llamar  a  una  rutina  en  c.m.  mediante  el 
comando  SYS,  no  hace  falta  encerrar  la 
dirección  entre  paréntesis.  Así  en  vez  de  SYS 
(828)  puedes  hacer  SYS  828.  Algunas  veces 
pueden  pasarse  parámetros  (valores)  direc¬ 
tamente  a  la  rutina,  añadiendo  estos  valores 
entre  comas:  SYS  49152,100,200,2  pero  sólo 
cuando  la  rutina  en  cuestión  tenga  prevista 
esa  posibilidad. 

Tabulando  sin  límite 


El  comando  TAB,  al  igual  que  SPC,  puede 
utilizarse  para  hacer  PRINTs  “rápidos”. 
Dado  que  su  rango  es  de  0 — 255,  si  haces, 
por  ejemplo,  PRINT  TAB  (240),  conseguirás 
que  el  cursor  baje  cuatro  líneas.  Es  bastante 
más  rápido  que  PRINT  [4  CRSRD]. 

Verificando  los  programas  CM 

Para  verificar  un  programa  CM  que  esté 
en  una  dirección  de  memoria  distinta  de  la  de 
los  programas  Basic  tienes  que  utilizar  el 
comando  VERIFY  “PROGRAMA”, 1,1  ó 
,8,1  para  comprobar  que  sea  igual  que  el  que 
tienes  en  memoria,  pues  de  lo  contrario  te 
dará  siempre  7VERIFY  ERROR.  ■ 
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Por  Alvaro  Ibáñez 


Este  es  el  formato  más  utili¬ 
zado  de  todos.  Se  utiliza  en  los 
vectores  (que  pueden  “apuntarla 
cualquiera  de  las  posiciones  de 
memoria  de  los  64K),  en  las 
variables  de  tipo  entero  del  Basic 
(indicadas  con  “%”)  y  en  otn*s 
muchas  cosas.  Es  el  más  útil  de 
todos,  porque  ofrece  un  rango  de 
valores  relativamente  amplio  y  es 
sencillo  de  manejar. 

Estos  dos  formatos  (el  com- 
plemento  a  dos  y  el  entero)  tam¬ 
bién  pueden  utilizarse  sin  el 
sisno.  para  lo  cual  se  suele  utili- 


ficar — 1.  $FE  es  -4  w  u  es  -o. 
y  finalmente  $80  es  — 1'28.  El  flag 
N  del  registro  de  estado  se  pone  a 
uno  cuando  la  última  instrucción 
ejecutada  ha  dado  como  resul¬ 
tado  un  número  negativo. 

Bvte  Valor  Byte  Valor^ 


Si  bien  es  muy  fácil  manejar 
números  y  variables  en 
Basic,  en  código  máquina 
es  un  poco  más  compli¬ 
cado.  No  obstante,  esta 
complicación  se  ve  com¬ 
pensada  con  la  rapidez  y  el  aho¬ 
rro  de  memoria.  Hacer  una  suma 
en  código  máquina  es  mil  veces 
más  rápido  que  en  Basic.  Antes 
de  ver  cómo  funcionan  las  opera¬ 
ciones  básicas  (suma,  resta,  mul¬ 
tiplicación...)  veamos  cuales  son 
los  tipos  de  formato  numérico 
que  podemos  utilizar. 

a  dos” 


El  “complemento  a  dos  es  el 
formato  utilizado  para  los  núme¬ 
ros  que  sólo  tienen  un  byte  de 
longitud.  El  rango  es  muy  peque¬ 
ño  (256  valores)  y  para  las  aplica¬ 
ciones  normales  es  demasiado 
pequeño,  pues  ni  siquiera  abarca 
tener  el  rango  de  memoria  del  C-6 
(64K).  Este  sistema  de  numera¬ 
ción  se  utiliza  entre  otras  cosa; 
para  los  saltos  relativos  (BEQ 

L  _ _  .  i  _ coltíl 


El  “complemento 


Al  ser  el  C-64  un  ordenador  de 
8  bits,  cada  byte  puede  contener 
un  valor  entre  0  y  255.  Esto 
quiere  decir  que  podemos 
“variables”  que  contengan  valo¬ 
res  entre  0  y  255.  Para  algunas  de 
las  aplicaciones  de  código  má¬ 
quina  esto  es  suficiente,  pero 
para  la  gran  mayoría  se  queda 
corto.  Lo  primero  que  se  echa  de 
menos  son  los  números  negati¬ 
vos.  Por  ello  el  6502  utiliza  una 
notación  llamada  “complemento 
a  dos”  que  hace  que  los  256  valo¬ 
res  de  un  byte  se  consideren  en  el 
rango  que  va  desde  — 128  a  127. 

Se  utiliza  uno  de  los  bits,  el 
séptimo  como  indicador  de  “po¬ 
sitivo”  o  “negativo”.  Todo  byte 
cuyo  bit  siete  esté  encendido  se 
considera  un  número  negativo. 
De  este  modo  $00  se  considera 
cero;  $01,  uno;  $02  dos...  así 
hasta  el  $7F,  cuyo  valor  es  127.  Si 
a  $00  le  quitamos  uno,  se  con¬ 
vierte  en  $FF  (imagínate  que  la 
secuencia  0,1, 2. ..254, 255  es  cícli¬ 
ca),  de  modo  que  $FF,  que  tiene 
el  bit  siete  encendido,  va  a  signi- 


El  formato  “entero 


El  formato  “entero”  se  basa  en 
el  mismo  sistema  que^el  comple¬ 
mento  a  dos,  sólo  que  se  utilizan 
dos  bytes.  Aquí  pues  $0000  es 
cero,  $0001  uno...  hasta  $7Fbb, 
que  es  32767.  Por  el  otro  lado, 
$FFFF  es  —1,  $FFFE  —2,  asi 
hasta  $8000  que  es  —32768. 
Bytes  Valor  Bytes  Valor 


Coma  flotante 


En  vez  de  unos  límites  grandes 
(que  pueden  conseguirse  aumen¬ 
tando  el  número  de  bytes  en  un 
formato  “entero”),  lo  que  nos 
interesa  ahora  es  poder  utilizar 
números  fraccionarios.  Para  ello 
los  ordenadores  de  8  bits  utilizan 
el  sistema  llamado  “de  coma  flo¬ 
tante”  (floating  point,  en  inglés). 
Este  sistema,  que  es  el  mismo  que 
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cr* 


mina  a  fondo 


PAL  (C) 1979  BRAD  TEMPLETON 
2 


CONVERSION  DECIMAL 


COMA  FLOTANTE 


en  Decimal  y  binario 

UTILIZAR  " SVS828 , NUMERO 

(C) 1987  BY  ALVARO  IBANEZ 
VERSION  C64 


<K 


crí 


1901 

2001 

2101 

2201 

2301 

2401 

2601 

270« 

2801 

3001 

310> 

320« 

320« 

320« 

3201 

330« 

330« 

330« 

340« 

3601 

370« 

370* 

370* 

370* 

370* 

370* 

380* 

380* 

380* 

390» 

390* 

390* 

400* 

400* 

400* 

410* 

410* 

410* 

410* 


033C 

033C 

033C 

033C 

033C 

033C 

033C 

033F 

0342 


.OPT 


20  FD  AE 
20  9E  AD 
20  IB  BC 


evaarb 

BU8C0M 

CHROUT 

ROUND 

I 


I 


0345 

0347 

034A 

034D 

0350 

0352 

0355 

0356 

0358 

035A 


A0  08 

89  61  08  LOOP 
20  5B  03 
20  7C  03 
A9  0D 
20  D2  FF 

ce 

C0  0¿» 

D0  ED 
60 


035B 

035C 

035E 

035F 

0360 

0361 

0362 

0363 

0364 

0367 

036A 

036B 

036C 

036E 

036F 

0372 

0375 

0377 

037 A 

037B 


48 
29  F0 
18 
6A 
6A 
6A 
6A 
AA 

BD  93  03 
20  D2  FF 
68 
48 

29  0F 
AA 

BD  93  03 
20  D2  FF 
A9  20 
20  D2  FF 
68 
60 


5 

HEXA 


JSR 
JSR 
JSR 

LDY 
LDA 
JSR 
JSR 
LDA 
JSR 
INY 
CPY 
BNE 
RTS 

PHA 

AND 

CLC 

ROR 

ROR 

ROR 

ROR 

TAX 

LDA 

JSR 

PLA 

PHA 

AND 

TAX 

LDA 

JSR 

LDA 

JBR 

PLA 

RTS 


00, P 
828 
*AD9E 
*AEFD 
*FFD2 
*BC1B 

BUSCOM 

evaarg 

ROUND 

«0 

*61, Y 
HEXA 
BIN 
#13 

CHROUT 

#6 

LOOP 


;  .re 

.  EMITE  CARACTER  POR  PANTALLA 
j  REDONDEA  FAC 

I  evalua^y^a  coma  flotante 

,  REDONDEA 

i  EMITIR  FAC  DE  *61  A  *66,  Y*CONTADOR 
I  CARGAR  VALOR 


,  CONVIERTE  A  HEX , BIN  E  IMPRIME  “CR" 


,  SIGUIENTE  VALOR 
,  FIN  DE  LA  RUTINA 


,  CONVERTIR  A  HEX ADEC I MAL 
#'¿1111000® 


,  parte  ALTA  -  PASARLA  A  PARTE  BAJA 


HEX ADEC, X  IMPRIME 

CHROUT  |  LEE  ASCII  t 

#7,00001 111  |  PARTE  BAJA 

hexadec,x  C1I  y  lq  imprime 

CHROUT  |  LEE  ASCII  y 

#., 

CHROUT 


430* 

430* 

440* 

440* 

440* 

440* 

450* 

450* 

460* 

470* 

470* 

470* 

480* 

480* 


037C 

037E 

037F 

0380 

0381 

0384 

0386 

0388 

0389 

038B 

038E 

038F 

0391 

0392 


I 

BIN 


LOOP  2 


A2  07 
48 
68 
48 

3D  A3  03 

F0  03 

A9  31  UNO 

2C 

A9  30  CERO 

20  D2  FF 
CA 

10  EE 
68 
60 


LDX 

PHA 

PLA 

PHA 

AND 

BEQ 

LDA 

.BYT 

LDA 

JSR 

DEX 

BPL 

PLA 

RTS 


#7 


,  emite  un  espacio  y  vuelve 

,  CONVERTIR  BINARIO,  X-CONTADOR  BITS 


» 

30  31  32  HEX ADEC 
01  02  04  BITS 


^0,X  .  COMPRUEBA  BIT  ENCENDIDO  O  APAGADO 

,  CARGA  UN  " 1 " Y  SALTA  2  BYTES 
,  CARGA  UN  "B" 

CHROUT 

L00P2  I  IMPRIME  Y  VA  A  POR  EL  SIGUIENTE 
,  fin  DE  LA  RUTINA,  VOLVER 

;  "01234567GVABCDEF-'  I  ÍsP£a£AH|Í  NARIO^ 

1,2,4,8,16,32,64,128  | 
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el  que  utilizan  la  mayoría  de  las 
calculadoras  de  bolsillo,  también 
ñamado  por  algunos  “notacmn 
científica",  se  caracteriza  porque 
-un  número  cualquiera  se  com 
pone  de  dos  partes.  La  primera 
compuesta  por  una  cifra  no  nula, 
la  coma  y  los  decimales,  llamada 
MANTISA  y  la  se|un^  ^ 
número  entero  Hadado  EXP 
NENTE.  Esto  es  suficiente  para 
expresar  cualquier  número  real, 
como  muy  pronto  verem<£ 

La  fórmula  general  es:  la  man¬ 
tisa  multiplicada  por  la  base  ele¬ 
vada  al  exponente.  Para  expresar 
el  número  uno  en  base  décima 

(base  diez)  se  utiliza  1  (mantisa) 

10  (la  base)  t  o  (exponente).  Dos 
es  2  *  lOfO...  etc.  El  numero 10 

tendría  que  expresarse  como  10 

10t0,  pero  como  solo  puede 

haber  una  cifra  ante  la  coma,  y  10 

tiene  dos,  se  incrementa  el  expo¬ 
nente  y  se  "corre  la  coma  a  la 
izquierda.de  ahí  1° de "comafl°- 

tante”.  Diez  es  en  realidad  1,0 
1011  (el  cero  no  tiene  valor  y  se 
quTedaenl*10tl).„Este"corn- 

miento  de  la  coma  se  produce 
cada  vez  que  se  alcanza  la  base 
del  sistema  que  se  este  utilizando, 
en  este  caso  10. 

Un  número  fraccionario  como 
1  5  se  expresa  como  1.5  t uju, 

20.7  sería  2.07  *10tl.  Los  núme¬ 
ros  fraccionarios  entre  0  y  1  tie¬ 
nen  exponente  negativo:  0  4  es 

*  i  ot _ 1  Al  tener  que  correr  la 

coma  a  la  derecha,  hay  que 
decrementar  el  exponente.  Los 

números  nega.,»»lle»i»el»gno 

en  la  mantisa.  — 200  es  ¿  T 
Todo  lo  dicho  hasta  ahora 

corresponde  al  sistema  décima 

(base  10),  pero  puede  aphcareeal 
ordenador,  que  trabaja  en  bina¬ 
rio  (base  2),  haciendo  los  oportu 

nos  cambios.  Así  l  en  coma  flo- 

tante  binaria  es  %1  2|  7c  ( 

en  cuenta  que  aquí  sólo  pueden 
utilizarse  unos  y  ceros  en  'a  me¬ 
lisa  y  el  oponente);  dos  sena  % 

*  2t%l'.  tres,  2t7oO 

(corriendo  la  coma  se  nos  queda 
en  %1.1  *  2t%L  cuatro  %1 
2t%10,  etc.  Para  expresar  un 
número  como  131  se  hace  lo 

¡siguiente.  oh  *  2|0 

131  =%1.0000011  *  2t7 
=  %1.0000011  *  2t%l  1 1 


PROGRAMA i  C0NVERS0R.C64  LISTADO  1 

_  A. 


100  REM  DEC  \  by^lVARO^BANEZ 
110  REM  <0  1907  BYALVAK 

S  K  ^^svs'^b.mumero" 

3  FOR I”020TO938»  READAi POKEI ,A.S-S 

NEXT. IF8< >1 1061THENPRINT“ERROR“ 
1 701  END  __  ««a  173.32 


170  END 
180  DATA 
190  DATA 
200  DATA 
210  DATA 
220  DATA 
230  DATA 
7 

240  DATA 
250  DATA 
260  DATA 
270  DATA 
280  DATA 
290  DATA 
300  DATA 
310  DATA 
320  DATA 
330  DATA 


-v?  253, 174, 32, 15Q» 173 * 32 

188’,  160.0. 1B=,97  0 

ia*7 .  XA 

3,32,210,233,104,72,41 
96  162,7,72,104,72,61 


64 

4 

,204 
.162 
.  116 
.220 

.0 

.172 
.  100 
.232 
.206 
.  138 
.  188 
.50 

.28 

.210 

.123 

.49 

.11 

.105 

.223 

.219 

.245 

.119 


PROGRAMA.  converbor . v i c  listad 

-> 


5  I 


,  SSSSffiSSW-^ 

B  EN°  ™  «  253.206,32,158,205,32 

1S  KS  i? 

102  DATA  32,91,3,  ,  £  192,6 

103  DATA  13,32,210,233  20»Í4b>24 

s¡  vsí 

106  DATA  3.32,210,2=3,104, 72, 410 

107  DATA  1S'1^®Il®^,327210,235,104 

108  DATA  233.1^9,32^2.210^^. 

109  DATA  96,162,7,  x  169  49,44 
lia  DATA  l^ríi^'zía.zás..»2'16 

1  i=.Í3.=A.=|.=*.=7ií‘= 

¡L  data 

115  DATA  4,8,16,32,  f 


221 

,152 

.23 

.36 

.237 

.76 

.195 

.10 

.174 

.197 

.108 

.31 

.72 

.181 

.  150 
.67 
.226 
.143 
.96 
.181 
.34 
.21 
.38 
.159 


52/Commodore  World 


C?  Cft^r  Máquina  a  fondo 


W 

W 


<K 


Los  números  fraccionarios  _J 

como  14,25  también  pueden  ex-  ( 

presarse  por  este  sistema,  de  la  ( 

siguiente  manera:  ( 

14  25  =%1 110.01  *  2f0 
=%l.l  1001  *  2f3 
=9bl.H001  * 

¿Por  qué  14.25  en  binario  es 

%1 1 10.01?  Ten  en  cuenta  que  los  a 

“pesos”  de  los  bits  a  continuación  e 

de  la  coma  en  un  número  binario 

son  2f — 1  (0-5)’  2t-2  (0  25).  -  y  c 
que  funcionan  de  la  misma  r 

manera  que  los  pesos  de  los  bits  s 
positivos,  sumándose  cuando  los  ( 

bits  correspondientes  están  en-  ( 

cendidos.  Así  pues,  14.25  es  , 

%1 1 10  (14),  la  coma,  y  %  0i  , 
(.25). 

Los  números  y  exponentes 
negativos,  como  ya  habrás  su¬ 
puesto,  se  pueden  almacenar 
como  “complemento  a  dos  de  la 
mantisa  o  el  exponente.  Esto  no 
es  del  todo  cierto,  y  lo  explicare¬ 
mos  más  adelante. 

En  rango  en  el  que  podemos 
movernos  con  números  de  coma 
flotante  depende  de  las  longitu¬ 
des  en  bits,  de  la  mantisa  y  el 
exponente.  En  el  C-64  la  mantisa 
se  compone  de  cuatro  bytes  (32 
bits)  y  la  del  exponente  de  un 
byte  (8  bits).  Con  esto  se  consigue 
una  precisión  de  aproximada¬ 
mente  9  dígitos  decimales  a  partir 
de  la  coma,  y  un  rango  de  — 4U  a 
1  37  para  el  exponente.  Esto  es  mas 

que  suficiente  para  la  mayoría  de 
i  los  cálculos,  y  proporciona  una 
exactitud  bastante  buena.  Los 

>  números  que  se  pueden  represen¬ 
tar  son  pues  desde  3.9  10f  40 

>  hasta  8.5  *  10|37.  Los  ordenado¬ 
res  grandes  utilizan  a  veces  un 

>  sistema  llamado  DBLP  (Double 
Precision=doble  precisión),  en  el 

5  que  se  utilizan  más  bytes  como 
mantisa,  con  el  consiguiente  au- 
í  mentó  de  precisión. 

El  almacenamiento  en  coma 

P  flotante  en  el  C-64  tiene,  no  obs¬ 

tante,  dos  peculiaridades. 

5  1)  Para  expresar  el  byte  del 

exponente  de  un  número  positivo 
?  o  negativo  no  se  utiliza  el  com- 
r  plemento  a  dos,  sino  un  offset 
P  (desplazamiento),  que  se  obtiene 
según  la  siguiente  tabla: 


Byte  Exponente  Byte  Exponente 


00 

0 

81 

01 

—128 

82 

02 

—127 

FE 

7F 

—2 

FF 

80 

—1 

Esta  tabla  corresponde  a  sumar 
a  un  byte  con  complemento  a  dos  = 
el  factor  $80,  de  ahí  lo  del  “des-  0 
plazamiento”.  Por  convenio  si 
cuando  el  exponente  es  cero  el 
número  también  es  cero.  Asi  se  0< 
simplifican  y  aceleran  muchos  si 
cálculos,  además  de  que  se  pue-  n 
den  tratar  casos  especiales  como  r 
la  división  por  cero.  El  resto  de  n 
los  valores  se  utilizan  porque  al  1 
ordenador  le  resultan  más  fáciles  c 
para  trabajar  internamente.  i 

2)  El  signo  de  la  mantisa  se  1 
almacena  como  un  byte  aparte,  y  i 
no  “como  complemento  a  dos  de 
la  mantisa”.  También  hay  otro 
sistema:  dado  que  la  primera 
cifra  de  la  mantisa  no  puede  ser 
cero  (porque  entonces  habría  que 
correr  la  coma  a  la  izquierda),  en 
binario  sólo  puede  ser  un  “uno  . 
Este  bit,  que  por  estar  siempre  a 
es  inútil,  se  utiliza  como 
signo:  0  =  positivo  y  1  =  negati¬ 
vo.  En  la  práctica  el  C-64  utiliza 
ambos  sistemas,  de  modo  que  el 
número  1  puede  expresarse  como 
81  00  00  00  00  o  como  81  80  00  00 
00  +  00  de  signo  (ver  más  ade¬ 
lante). 

Los  seis  mágicos  bytes 

Los  seis  bytes  que  componen 
un  número  de  coma  flotante  son. 
el  exponente,  cuatro  de  mantisa, 
numerados  del  1  al  4,  y  final¬ 
mente  el  signo  (opcional,  como 
veremos  a  continuación).  La 
>  mantisa  contiene  los  bits  de 
izquierda  a  derecha,  al  contrario 
de  lo  que  es  normal  en  binario. 
1  Veamos  un  ejemplo  práctico  de 
conversión: 

123  =  %1 1 1 101 1  *  2|0 
‘1  =  %1. 111011  *  2f6 

o  =  %1.1 11011  *  2f%H0 

l~  El  exponente  (6)  =  $87  (según 
la  tabla  de  exponentes). 
ie  Mantisa  =  %1 11101 10 


%00000000  %00000000 
%00000000,  rellenando  con  ceros 
a  la  derecha. 

=  %01 1 101 10  %00000000 
%00000000  %00000000,  cambian¬ 
do  el  primer  bit  por  el  signo, 
como  hemos  explicado  antes. 

=  $76  $00  $00  $00 
123  en  coma  flotante  — 

=  $87  $76  $00  $00  $00. 

O  bien  -  $87  $F6  $00  $00  $00 

signo  $00.  .  .  nfl 

El  número  —123  seria  87  F6  00 
00  00  o  bien  87  F6  00  00  00  con 
signo  $FF.  El  byte  del  signo  es  1 
independiente  y  vale  $00  para  los 
números  positivos  y  $FF  parales 
negativos.  Este  byte  sólo  se  uti¬ 
liza  en  las  rutinas  de  coversion  y 
cálculo,  mientras  que  los  núme¬ 
ros  que  están  almacenados  en 
ROM  del  C-64  para  usos  inter¬ 
nos  se  almacenan  con  el  signo 
incluido  en  la  mantisa.  Los 
números  negativos  se  reconocen 
i  con  facilidad,  pues  el  primer  byte 
de  la  mantisa  1  es  igual  o  mayor 
:  que  $80,  dado  que  el  bit  7  esta  a 
i  1.  Mientras  no  digamos  lo  con¬ 
trario,  supondremos  que  el  signo 
i  está  incluido  en  la  mantisa. 


Ocho  mejor  que  seis 

Hemos  visto  que  seis  bytes  son 
suficientes  para  definir  un  número 
de  coma  flotante  (exponente 
mantisa  y  signo).  Sin  embargo  el 
C-64  utiliza  otros  dos  bytes  adi¬ 
cionales  para  sus  cálculos  inter¬ 
nos  ; Cuáles  son  estos  bytes.  El 
primero  es  le  llamado  “byte  de 
redondeo”  y  se  utiliza  para  efec¬ 
tuar  un  pequeño  redondeo  en  los 
números  que  exceden  la  capaci¬ 
dad  de  cálculo  de  la  mantisa.  El 
número  0.4  en  coma  flotante  es 
7F  4C  CC  CC  CC  ...  Dado  que 
no  puede  expresarse  exactamente 
(este  es  uno  de  los  problemas  del 
cambio  de  sistema  de  numera¬ 
ción)  se  redondea  arriba  o  abajo 
el  último  bit.  En  nuestro  ejemplo 
0  4  quedaría  expresado  como  /r 
4C  CC  CC  CD  tras  la  operación 
de  redondeo. 

El  segundo  byte  se  llama  byte 

comparativo  de  signo"  y  se  utiliza 

en  algunas  de  las  operaciones  de 
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coma  notante  que  utilizan  dos 
números,  la  multiplicación,  por 
ejemplo.  Si  los  dos  números  tie¬ 
nen el  mismo  signo  el  “byte  com¬ 
parativo”  contiene  $00  y  si  son 
distintos,  $FF. 

Un  vistazo  al  mapa  de  memoria 


<£ 


crt 


Veamos  la  zona  en  la  que  el  cua 

C-64  almacena  los  números  en  con 

coma  flotante  para  trabajar  con  ^  ^ 

e"$57-$5B  registro  para  antmé- 
tica,  acumulador  #3.  > 

S5C-S60  registro  para  aritme  y^ 

tica  acumulador  #4.  ' 

$61-$65  acumulador  de  coma 

notante  #1,  FAC  la 

$66  signo  de  b  Ai- . 

567  contador  para  evalúa-  P 

ción  de  polinomios. 

$68  byte  de  overflow  para 

F  AC.  — 

S69-S6D  acumulador  de  coma 

flotante  #2,  ARG.  c 

$6E  signo  de  AKu.  f 

<t6F  byte  comparativo  de 

los  signos  FAC  y  ARG. 

$70  byte  de  redondeo  J 

para  F AC .  » 

V  El  “FAC”  (Floating  point  AU- 
cumulator)  es  el  principal  lugar 
donde  se  procesan  los  números 
de  coma  notante.  Acostúmbrate 

,  a  lo  de  “FAC”  a  partir  de  ahora 

Lo  de  “acumulador  viene  dado 

*  porque  se  utiliza  para  almace- 
’  nar”  números.  Hay  otros  tres 
)  acumuladores,  el  ARG  (ARG 

ment)  o  segundo  acumulado  , 

)  que  es  el  segundo  en  importancia 

5  otros  dos,  el  ACC#3  y  ACC#4 
J  que  se  utilizan  para  otros  menes¬ 
teres.  Los  cálculos  que  Pteci 
}  un  sólo  número  en  coma  notante, 

J  como  hallar  el  1NT(A).  se  proce- 
0  san  en  el  FAC.  S.  hacen  falm  dos 
números,  para  ejecuta 
A  2+2  por  ejemplo,  se  utilizan 

*  PAC  y  el  ARG.  Para  cálculos 
más  complicados  se  utilizan  el 

^  ACC#3  y  el  ACC#4. 

En  tus  programas  podrías  uti- 

*  i;7ar  tus  propios  acumuladores 
¿  de  coma  Rotante,  situándolos  en 

^  cualquier  parte  de  la  memor  a 

5  pero...  ¡hay  de  ti  si  intentas 


rxrtfis»» 

„¿).  además  de  «.ras  sub- 

nr«:eXr<,«d;J.m«se»e, 

del  Basic”.  Eso  es  lo  que  se  hace 
cuando  trabajas  con  números  de 
coma  flotante  Ha,  rutinas  pata 
convertir  un  byte  con  o  sin  signo 

o  coma  notna^ntneUmery  después 

^crnlrutSparasLarEAC 
y  ARG,  multiplicarlos,  divid 
los  sacar  senos  y  cosenos...  j 

,0  que  quieras!  Esto  lo  dejaremos 

para  el  mes  que  viene,  asi  como 
fas  operaciones  aritméticas  sim¬ 
ples  fon  números  de  uno  o  dos 
bytes. 


Un  poco  de  práctica 


El  programa  de  este  mes  es  un  c( 

P  Ao.  Henmal  — coma  .-i 

conversor  de  decimal  d 

Rotante—  Ademas  de  ser^rl  « 

para  hacer  algunas  prueba* l 

Prácticas  con  la  conversión,  pue  c 

5S  Sirar  do,  Ínteres»®  j 

subrutinas  en  tus  programas  las  ( 
de  conversión  a  hexadecimal  y  a  { 

"TÍ  el  cargador  basic  de  lo*  ‘ 

listados  1  ó  2,  según  tu  ordenado. 
C-64  o  Vic-20).  Para  arrancar 

iroVrama  haz  RUN.  A  continua¬ 
ción  puedes  convertir  cualquier 
número  decimal  a  coma  Rotante 
conefeomando  SYS828,  número. 

He  aquí  un  ejemplo: 

SYS  828,  4194014 
96  10010110 
FF  lililí'1 
FB  11111011 
78  01111000 
00  00000000 
00  00000000 

El  resultado  se  expresa  en 
hexadecimal  (la  primera  colum- 
1  na)  y  en  binario  (la  segunda).  El 
primer  byte  es  el  exponente,  los 
-  cuatro  siguientes,  la  mantisa  y  el 
,  SSo«f  signo.  .El  signo  »»  ™ 
i  incluido  en  el  primer  byte de  la 
t,  mantisa,  por  lo  que  siempre  esta 


Las  rutinas  utilizadas,  que 
veremos  en  próximos  capítulos 
son  EVAARG,  que  suve  para 
evaluar  una  expresión  Basic  (un 
número,  variable  función)  y 
nasarlo  a  coma  flotante.  BU 
COM  que  busca  una  coma  en  la 
Unea  Basic,  CHROUT,  que  im- 

U»  e‘drisa.“R0ÍND. 

Cqr.°¿S  o»  redondeo  de. 

FALCa  subrutina  HEXA  (líneas 
360-410  del  listado  fuente)  con¬ 
vierte  el  valor  del  acumulador  a 
hexadecimal,  y  lo  imprime  po 
pantalla.  Si  te  fijas,  veras  que  los 
cuatro  bits  “altos”  de  cualquier 
wvte  (bits  4-7)  son  la  primera 
“letra”  de  las  dos  que  forman  el 

número  expresado  en  hexadec^ 
mal  y  los  cuatro  “bajos  (0-3)  la 

segunda.  Sabiendo  esto  se  pasan 
to? bits  altos  a  bits  bajos  que  se 
quedan  con  un  valor  entre  0  y  • 

'  A  continuación  se  lee  el 

1  correspondiente  a  ese  valor  déla 

a  dirección  “HEXADEC  y 

e  imprime.  Lo  mismo  se  hace  con 
y  ios  bits  bajos.  Se  utiliza  el 
--  comando  ROR  para  mover  aja 

»  derecha  los  bits  “altos  Y  el  stack 

as  (comando  PHA  y  PLA)  para 

a  guardar  temporalmente  el  val 

del  acumulador. 

os  La  otra  subrutina,  B1N,  con 
or  vierte  a  binario.  Se  utiliza  e 
el  registro  X  como  contador  del  bit 
ta-  qu8e  se  va  a  convertir  y  se  van 

ier  comprobando  uno  a  uno  (los 
nte  “nesos”  están  almacenados  en  la 

:ro  d&n  -BITS-),  según  o»en 

encendidos  o  apagados  se  impn 
me  un  1  o  un  0. 

Bien,  esto  es  todo  por  este  mes  | 
Por  falta  de  espacio  no  hemos 
podido  ver  los  bucles  y  las  formas 
de  sacar  mensajes  P°rPanj 
como  dije  el  mes  pasado.  Intenta 
remos  que  el  mes  que  viene 

entren  junto  con  las  operaciones 

1  en  húmicas  (suma,  resta...)  de  uno  y 
S"E  Sos  Vos  y  .Oías  las  funciono, 

1  i  basic  de  coma  flotante.  Una 
°pi  Última  cosa:  se  admiten  sugeren- 
1  y  6  das  sobre  próximos  temas  a  tra- 
va  tar  si  voy  demasiado  rápido  o 

o  X  ¿masiado  lento,  si  hacen  falta 
más  ejemplos,  etc. 
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<  C/  Córcega,  247 
Tel.:  (93)  237  39  94  -  218  56  04 
08036  BARCELONA 
Importador  exclusivo 

ROBOTIC  ARM 
para  Commodore-64  y  128 
DISTRIBUIDOR  OFICIAL 
COMMODORE 


INORMA 

Reparación  y 
mantenimiento 
de  ordenadores 


Dr.  Roux,  95  (bajos) 
Tel.  (93)  205  32  69 
08017  Barcelona 


ELECTROAFICION 

•  Ordenadores  de  gestión  PC 

•  Microordenadores 

•  Accesorios  informáticos 

•  Software  gestión  -  Juegos 

•  Radio  aficionados 

•  Comunicaciones 

C 7  Villarroel ,  104 

08011  Barcelona  -  Tels.:  253  76  00-09 


•  ORDENADORES  PERSONALES 

•  ACCESORIOS  INFORMATICA 

•  COMPONENTES 
ELECTRONICOS 

•  TELECOMUNICACIONES 

Paseo  de  Gracia  126-130 
Tel.  237  11  82’  08008  BARCELONA 


Convierte  tu  ordenador  inglés 
en  un  ordenador  español 
mediante  este  cartucho. 

Solamente  £  75  (libras  esterlinas) 
incluyendo  envió  aéreo. 

Enviar  pedido  a: 

Premlink  Exports  -  5,  Fairholme  Gardens 


London  N.  3  -  T:  01-346  1044 


COMMODORE  16.  64  128 

COMMODORE  PC  ^ - ' 

y  PERIFERICOS 

SOFTWARE  I^aTALO^ 

HARDWARE  U 

Horra  Novell*  128  Tel  T2b  8b  b8  iSABADEll 


COMPUTERS,  S.  A 


Lápiz  óptico  Trojan  .  4.500  Ptas. 

Commodore  64  .  39.500  Ptas. 

Joystick  Quickshoot  II  .  1.695  Ptas. 

Joystick  Quickshoot  V  .  1.695  Ptas. 

Cassette  Compatible  Commodore  4.950  Ptas. 

A  vda.  de  la  Luz ,  60 

Tel.:  302  60  40.  08001  Barcelona 


UNICO  EN  ESPAÑA: 

Todo  tipo  de  repuestos  para  COMMO¬ 
DORE  y  manuales  de  reparación  en 
existencias. 

REPARACION  RAPIDA  A  PRECIOS 
RAZONABLES. 

Avda.  de  Andalucía,  17.  29002  Málaga 
Tels.:  (952)  33  27  26  35  10 07  Télex:  774X0  cacen.* 


MAXI-MICRO 

I, »f n  ■  i»,  i'.l!  . 

IIIIUV IINIIMU 

•  COMMODORE-SPECTRUM-AMSTRAD 

•  SERVICIO  TECNICO  DE  REPARACIONES 

•  OFERTAS  ESPECIALES  DE  INAUGURACION 

•  PERIFERICOS-HARDW  ARE-SOFTWARE 

•  COMMODORE  64+PERIFERICOS 
POR  2.500  PTAS.  MES 

•  PIDE  CATALOGO  OFERTAS  INAUGURACION 
C/.  Valencia,  57/ -enífo.  5“  08013  BARCELONA.  TL:(93) 2324836 


AREVALO  MICROSISTEMAS,  S.L. 

Travesera  de  Alfonso  El  Batallador,  16  -  Pamplona  -  Tel.:  27  64  04 


VENTA-REPARACION 


*  VENTA 


ORDENADORES  PERSONALES 


—  MSX -  SANYO 

—  MSX  -  Spectravídeo 

—  ZX  -  Spectrum  plus 

—  Commodore  64/128 


COMPATIBLES  PC 
COMPONENTES  ELECTRONICOS 
TODA  CLASE  ORDENADORES  PERSONALES 
TODA  CLASE  COMPATIBLES  PC 


*  REPARACION 


EL  CASTILLO  DEL  DRAGON 

Tengo  un  problema  con  la  carga  de  este 
programa.  Cuando  hago  RUN,el  programa 
inicia  bien  su  proceso,  sale  en  pantalla  el 
“espere  un  momento,  por  favor...”  después 
ejecuta  la  carga  de  la  segunda  parte  y  acto 
seguido  dibuja  en  pantalla  el  laberinto  del 
castillo  y  los  dos  cuadros  de  OPCIONES  y 
FUERZA,  etc. 

Inmediatamente  me  aparece  en  la  pantalla 
un  SYNTAX  ERROR  IN  20.  Aquí  ya  se 
inmoviliza  sin  que  sea  posible  continuar. 

Por  supuesto  utilicé  el  programa  PER¬ 
FECTO.  Lo  comprobé  y  repasé,  etc...  Res¬ 
pecto  a  este  programa,  ¿pueden  decirme  de 
qué  forma  puede  anularse  el  listado  de 
PERFECTO?  Resulta  que  al  hacer  SAVE  se 
cargan  ambos  programas  PERFECTO  y  EL 
POSTERIOR.  Con  esto  se  mezclan  las  líneas 
anulándose  las  de  igual  número  introducidas 
en  segundo  lugar,  pero  conservándose  las 
que  tienen  homólogo  en  el  PERFECTO.  Se 
arma  un  lío  impresionante. 

Francisco  Fernández  Lozano 
C /  Industria,  65  -  5Q  1.a 

Grano  llers  (Barcelona) 

Lo  único  que  podemos  recomendarte,  des¬ 
pués  de  repasar  varias  veces  el  programa,  es 
lo  siguiente: 

Repasa  las  líneas  10  y  11  del  segundo  lis¬ 
tado.  Si  falta  alguna  línea  o  dato,  el  pro¬ 
grama  dará  un  error  de  sintaxis  al  intentar 
leer  como  numérica  un  dato  alfanumérico. 
También  puede  ocurrir  que  las  variables  de 
las  líneas  111  ó  112  estén  mal  definidas.  Lo 
mejor  es  que  compruebes  ambos  casos. 

En  cuanto  al  programa  PERFECTO,  lo 
normal  es  que  borres  la  memoria  antes  de 
comenzar  a  programar.  Introduce  un  NEW  y 
comprueba  que  tienes  la  memoria  limpia 
(después  de  ejecutar  el  programa).  Una  vez 
ejecutado,  puedes  introducir  cualquier  pro¬ 
grama.  La  suma  de  control  saldrá  automáti¬ 
camente  al  introducir  cualquier  comando  o 
línea  y  pulsar  RETURN. 


SERVICIO  DE  CINTAS 
PARA  PROGRAMAS 
DE  VARIAS  PARTES 

Desearía  que  me  aclaraseis  una  duda  que 
tengo  sobre  vuestro  servicio  de  cintas.  Tengo 
un  C-64  desde  hace  poco  tiempo,  pero  com¬ 
pro  Commodore  World  desde  hace  dos  años. 

Si  en  el  servicio  de  cintas  pido  uno  de  los 
tres  programas  del  BASIC  4.5,  ¿qué  me 
mandáis?,  sólo  el  cargador  principal  (listado 
1)  o  todos  los  programas  (listados  del  2  al  8) 
que  aparecieron  en  ese  artículo,  del  nQ  21  de 
la  revista. 


David  Noviembre  Naranjo 
^  C/  Santiago,  44 

21740  Hinojos  (Huelva) 

Esta  respuesta,  como  muchas  otras,  espe¬ 
ramos  que  sirva  para  muchos  usuarios  del 
servicio  de  cintas  y  en  general  para  todos  los 
lectores  de  la  revista. 
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Cuando  enviamos  un  programa  a  través 
del  servicio  de  cintas,  lo  hacemos  al  com¬ 
pleto.  Si  el  programa  tiene  varias  partes  que 
trabajan  por  separado,  las  incluimos.  Si  las 
diferentes  partes  o  listados  son  complemen¬ 
tarios,  por  razón  de  tiempo  y  efectividad,  los 
convertimos  en  uno  solo.  Y  en  caso  de  que  el 
programa  principal  esté  acompañado  de 
demostraciones  o  listados  que  aprovechen  sus 
posibilidades,  los  incluimos  igualmente. 


C-16  EN  CODIGO  MAQUINA 

Quisiera  preguntaros  unas  cuantas  cosas 
sobre  el  C-16,  pues  estoy  preparando  una 
colaboración  para  vuestra  revista. 

Estoy  intentando  adaptar  el  programa 
AUTO-RUN  de  la  ya  difunta  serie  Cursillo 
por  la  Microprogramación.  Pero  tengo  unas 
cuantas  dudas  sobre  las  siguientes  cuestiones: 

¿A  qué  dirección  corresponde  en  el 
C-16  la  del  C-64  $A659  (hacer  un  CLR)?  y  la 
SA7AE  (ejecutar  RUN)? 

—  En  los  mnemónicos  que  utiliza  el  Moni¬ 
tor  de  C.M.  del  C-16,  ¿a  cuál  corresponde 
.ASC“  texto  ”?  Por  más  que  busco  y  rebusco, 
nada. 

—  Esta  última  cuestión  es  un  tema  que 
supongo  que  a  más  de  uno  le  interesa,  y  es 
que  ¿cuándo  vais  a  comentar  juegos  para  el 
C-16?  Por  si  no  lo  sabéis,  este  ordenador  es  el 
tercero  con  más  programas  del  mercado. 
Además,  según  parece,  las  adaptaciones  para 
este  ordenador  son  mejores  incluso  que  los 
originales. 

Alfonso  García  Tejero 
C/  Ciudad  de  Málaga,  Bl.  1Q  2Q  C 
Melilla 
Telf:  (952)  68  42  70 

Sentimos  comunicaros  que  todavía  no 
poseemos  información  suficiente  sobre  el 
mapa  de  memoria  del  C-16.  Nuestra  inten¬ 
ción  es  publicarlo  en  el  próximo  número.  No 
os  defraudaremos,  un  poco  de  paciencia. 

Respecto  a  los  mnemónicos  del  Monitor 
de  C.M.  en  el  C-16,  el  ASC“  texto  ”  no  es  un 
mnemónico.  De  la  forma  que  aquí  aparece 
impreso,  es  un  “comando”  de  algún  Macroen- 
samblador.  Para  realizar  la  misma  función 
con  el  C-16  o  con  otro  ordenador  y  un  Moni¬ 
tor  de  C.M.,  es  necesario  utilizar  el 
“comando”  M. 

Esta  función  de  presentación  de  datos  en 
pantalla  permite  modificar  o  introducir 
caracteres  en  ASCII  o  Hexadecimal.  Para  un 
programa  en  C.M.  debes  convertir  el  valor 
ASCII  a  hexadecimal  antes  de  utilizarlo  con 
LDA,  LDX,  LDY,  STX,  etc. 

El  último  comentariio  que  nos  haces  es 
bastante  lógico  por  tu  parte,  pero  no  se 
ajusta  demasiado  a  la  realidad  de  este  país. 
Actualmente  se  comercializan  muchísimos 
programas  para  C-16  en  el  extranjero.  Aquí 
encontrarás  pocos  distribuidores  provistos 
de  software  para  este  modelo  de  Commo¬ 
dore.  A  pesar  de  todo,  si  los  importadores 
que  distribuyen  software  Commodore  nos 
envían  programas,  siempre  publicamos  rese¬ 
ñas  o  comentarios  de  los  mismos. 


BASIC  PARA  VIC-20 

Después  de  haber  copiado  y  corregido  el 
programa  BASIC  para  el  VIC-20,  de  la 
revista  nQ  24  y  por  más  vueltas  que  le  doy  no 
consigo  introducir  correctamente  el  comando 
#SOUND,  dándome  un  Syntax  Error  cada 
vez  que  lo  intento.  Con  los  demás  comandos 
no  tengo  ningún  tipo  de  problema. 

He  probado  cosas  como  #SOUND  VI,  145 
;  #SOUND  1,145  ;  #SOUND  145,  VI  ;  etc. 

José  Juan  García  García 
C/  Olivilla,  5 
23360  La  Puerta  de  Segura  (Jaén) 

El  problema  que  planteas  es  bastante  fácil 
de  solucionar.  Lo  primero  que  hay  que  hacer 
antes  de  utilizar  un  nuevo  comando  es  leer 
bien  las  instrucciones.  Además,  lo  que  hace 
normalmente  el  ordenador,  o  lo  que  necesita 
hacer,  no  varía  al  ampliar  los  comandos. 
Concretamente,  #SOUND  necesita  cuatro 
parámetros  para  funcionar.  Esto  se  debe  a 
que  el  VIC  tiene  cuatro  voces,  y  es  necesario 
conectar  o  desconectar  las  cuatro  mediante 
este  comando  nuevo. 

La  sintaxis  del  comando  no  permite  utili¬ 
zar  ni  más  ni  menos  de  cuatro  parámetros. 
Por  lo  tanto,  se  debe  acompañar  de  los  valo¬ 
res  deseados  para  todas  las  voces. 


MAS  SOBRE  PROGRAMAS 
EN  CINTA 

Les  ruego  que  me  comuniquen  si  los  pro¬ 
gramas  publicados  “Tiro  al  blanco”  (1  /  84)  y 
“El  Arte  de  realizar  Organigramas”  (1 1/85), 
pueden  ser  enviados  por  el  servicio  de  cintas, 
para  su  posterior  pedido. 

Jesús  del  Val  Bodas 
C/  Pere  111,  76  bajo,  deha. 

17600  Figueras  (Gerona) 

En  principio  todos  los  programas  que  apa¬ 
recen  listados  en  la  revista,  pueden  ser  envia¬ 
dos  a  través  del  servicio  de  cintas.  Pero  a 
pesar  de  nuestro  deseo  de  servir  a  todo  el 
mundo,  como  ya  sabéis,  algunos  programas 
no  funcionan  sin  unidad  de  disco.  Por  lo 
tanto,  se  especifica  en  el  listado,  o  el  artículo. 

En  el  caso  de  los  programas  por  los  que 
nos  preguntas,  pueden  funcionar  perfecta¬ 
mente  cargados  desde  cinta.  Por  lo  tanto,  te 
los  podemos  enviar  cuando  lo  desees. 


PEDIDOS  DE  PROGRAMAS 
COMERCIALES 

Soy  un  suscriptor  de  la  revista  y  estoy 
encantado  por  la  magnífica  sección  de  juegos 
que  han  introducido.  Poseo  un  C-64  con  cas¬ 
sette  y  me  interesaría  que  me  enviaran  los 
juegos  que  a  continuación  les  indico... 

( Omitimos  el  nombre  y  la  dirección 
por  deseo  de  la  redacción) 

Esta  es  otra  respuesta  que  debe  servir  para 
todos  los  lectores. 


NOSOTROS  NO  VENDEMOS 
SOFTWARE  COMERCIAL 
Para  eso  están  las  casas  dis¬ 
tribuidoras  y  los  comercios 
especializados  en  informá¬ 
tica,  o  también  los  grandes 
almacenes. 

Lo  que  debe  quedar  claro 
para  siempre  es  que  nosotros 
sólo  enviamos  cintas  o  discos 
de  programas  listados  en  la 
revista.  Si  no  se  han  publi¬ 
cado  (listados)  no  son 
nuestros,  por  lo  cual  no 
podemos  disponer  de 
ellos.  Esperamos  que 
quede  suficientemente 
claro  para  todos  los  po¬ 
sibles  compradores  de 
software.  Hay  que  acos¬ 
tumbrarse  a  comprar  en  las 
tiendas  y  a  los  distribuidores 
oficiales. 

PLUS  4, 

UN  PROBLEMA 
DE  SUMINISTROS 

Me  dirijo  a  ustedes  para 
solicitarles  información  sobre 
clubs  de  usuarios  y  distribui¬ 
dores  de  software  y  hardware, 
para  el  Commodore  Plus  4. 
Ya  que  tras  su  adquisición  no 
he  podido  conseguir  ni  programas 
ni  dispositivos  para  este  ordenador. 
No  conozco  dónde  dirigirme  ni 
encuentro  material  en  los  distri¬ 
buidores  habituales  de  mi  zona. 
Les  agradecería  que  me  informa¬ 
sen  sobre  este  tema. 

Antonio  José  Zambrana  Sojo 
C/  Torre  la  Plata,  5 
41700  Dos  Hermanas  (Sevilla) 

Sentimos  mucho  que  sigan  re¬ 
pitiéndose  casos  como  el  que  nos 
planteas.  Realmente  no  existe 
motivo  para  que  se  comercialicen 
en  este  país,  productos  del  Plus  4.  Ni 
siquiera  se  ha  vendido  el  ordenador, 
por  lo  tanto,  mucho  menos  sus  pro¬ 
gramas  o  periféricos.  Por  supuesto,  no 
se  tiene  en  cuenta  la  venta  fuera  de  los 
circuitos  normales  de  importación. 

Para  encontrar  algo  interesante  sobre 
tu  ordenador  debes  dirigirte  al  extranjero. 
Sentimos  no  poder  darte  mejor  solución. 

FOTOS  Y  JUEGOS 

Soy  un  suscriptor  de  su  revista  y  qui¬ 
siera  hacerles  las  siguientes  preguntas: 

1.  ¿Cuáles  son  los  datos  de  apertura 
del  diafragma  y  tiempo  de  exposición 
para  obtener  una  fotografía  de  la  panta¬ 
lla  del  televisor? 

2.  ¿Qué  juego  hay  en  el  mercado 
español  para  C-64  (disco  o  cinta)  que  se 


pueda  salvar  a  cinta  o  disco  en  cualquier 
momento  para  comenzar  un  nuevo 
juego  a  partir  de  ella,  como  ocurre  con 
ELITE? 

Federico  Iborra 
Suscriptor  1.376 


1.  Para  conseguir  buenas  fotos,  lo  que 
tienes  que  regular  principalmente  es  la 
velocidad.  La  apertura  del  diafragma 
dependerá  del  brillo  de  la  pantalla  y  del 
entorno,  que  normalmente  debería  estar 
completamente  a  oscuras  (para  evitar 
reflejos).  Si  la  cámara  es  automática  no 
tienes  que  modificar  el  valor  que  te  dé. 

El  tiempo  de  exposición  puedes  regu¬ 
larlo  de  dos  maneras:  o  consigues  un 
tiempo  que  sea  múltiplo  de  la  frecuencia 
de  barrido  del  televisor  (50  Hz),  es  decir, 
1/50  ó  1/25  (tienen  que  ser  valores  muy 
exactos)  o  bien  utilizar  una  velocidad 
lenta  (1  ó  2  segundos).  Con  cualquiera 
de  estos  dos  sistemas  consigues  que  no 
aparezca  en  pantalla  la  línea  de  barrido 
de  televisión. 

2.  Hay  bastantes  juegos,  sobre  todo 
los  de  aventuras  “habladas”  o  conversa¬ 
cionales,  que  tienen  esa  posibilidad. 
Desde  los  más  viejos  —El  Hobbit,  Los 
Gremlins—  hasta  los  más  recientes  —  Bo- 
rrowed  Time,  Labyrinth— ,  este  último 
sólo  en  la  versión  disco. 


RESPUESTAS  CORTAS 

Manuel  González,  de  Torredembarra 
(Tarragona) 

La  utilización  del  programa  RUNSCRIPT 
está  bastante  detallada  en  el  ESPECIAL 
UTILIDADES.  A  pesar  de  todo,  muchos 
usuarios  nos  han  formaulado  preguntas  que 
van  apareciendo  en  esta  sección  de  los  últi¬ 
mos  números. 

Respecto  al  BLITZCOPY,  ya  sabemos  que 
algunos  lectores  han  tenido  problemas  con 
este  programa.  En  la  mayoría  de  los  casos 
se  ha  debido  a  la  versión  del  Kernal.  En 
otros,  la  culpa  era  del  disco  sobre  el  que  se 
deseaba  copiar  (mala  calidad).  Lo  que  sí  os 
podemos  asegurar  es  que  el  programa  está 
correcto.  Funciona  y  copia  perfectamente  ya 
que  nosotros  lo  hemos  probado  y  otros  usua¬ 
rios  así  nos  lo  han  comunicado  también.  Por 
supuesto,  sólo  permiten  realizar  copias  de 
seguridad.  No  copia  discos  comerciales. 

Daniel  Gutiérrez,  de  Madrid 

El  montaje  que  permite  ampliar  la  memo¬ 
ria  RAM  del  C-16  hasta  64K  se  publicó  en  el 
número  31,  página  16,  correspondiente  al 
mes  de  noviembre  de  1986.  Está  comprobado 
y  ha  sido  realizado  por  varios  usuarios  que 
nos  lo  han  comunicado  posteriormente. 

Sobre  la  compra  de  juegos  para  el  C-16, 
creo  que  habrás  encontrado  respuesta  en 
estas  mismas  páginas. 
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MERCADILLO 


•  Vendo:  Commodore  Vic-20  +  módulo  expan¬ 
sión,  Commodore  +  monitor  fósforo  verde  con 
sonido  T  Unidad  de  disco  +  Cassette  4-  Cartucho 
40  SO  col.  Ferret  Moret  +  Cartucho  ayuda  al  pro¬ 
gramador  4  32  Kb  ampliación  RAM  Código 
máquina  4-  cassettes,  revistas,  libros,  etc.  Todo 
50.000  ptas.  José  Carmona  Saleta.  C  Amilcar, 
146  -  Io,  3.  0X032  Barcelona.  Tel.:  236  42  53.  (Ref. 
M-994). 

•  Vendo  Commodore  128K.,  unidad  de  disco  1571 
(rápida)  y  cassette.  Convenir.  Interesados  llamar  a 
Jaime  Morales,  de  9  a  12  de  la  noche  al  teléfono  de 
Barcelona:  (93)  214  31  72.  (Ref.  M-995). 

•  Vendo  C- 1 28,  unidad  de  disco  1571,  cassette 
Commodore,  monitor  fósforo  verde  Hantarex  y 
mesa  de  trabajo.  Todo  ello  con  menos  de  un  año  de 
uso.  Precio  a  convenir.  Junto  o  por  separado,  con 
manuales  y  garantías.  José  Ma  Pujol,  c  Joaquín 
Costa,  38.  08001  Barcelona.  Tel.:  302  26  52. 

( Ref.M-996 ). 

•  Estoy  interesado  en  conseguir  los  discos  que 
vienen  con  el  C-128  (CPM  3.0  v  disco  de  y  utilida¬ 
des)  y  también  los  libros  Manual  del  Usuario  y 
Guía  rápida  del  C-128.  Cambiaría  los  discos  o  libros 
por  el  Especial  Utilidades  y  lo  complementaría  con 
cintas  o  discos.  Eduardo  Fernández  de  Gamboa,  c 
lbaigani,  9  -  99  C.  48970  Basauri.  Vizcaya.  (Ref. 
M-997). 

•  Interesa  comprar  impresora  Riteman  C+ 
(NLQ).  Dirigirse  a  Jorge  Alday.  Plaza  Celestino  M ' 
Del  Arenal,  10  -  129  c.  48015  Bilbao.  Tel.:  447  51  48 
(Ref.  M-998). 

•  Compro  ordenador  C=64.  Zona  Vizcaya.  Javier 
Dombriz  Villasante.  c  Blas  de  Otero.  5  -  99  B. 
48014.  Tel.:  435  70  21.  (Ref.  M-999 ). 

•  Compro  C-64,  cassette  y  joystick.  Programa 
Midi  Composer  de  Micro  Music  o  similar,  e  inter¬ 
face  MIDI.  Gabriel  Díaz.  Apdo.  93045.  08080  Bar¬ 
celona.  Tel.:  217  90  80.  (Ref.  M-1000). 

•  Vendo  C-128,  unidad  de  discos  1541,  impresora 
MPS-801,  cassette  Commodore,  2  joysticks,  caja 
impresora,  libros  de  programación  C-64  C-128, 
curso  programación  CCC,  final  cartridge,  caja  para 
diskettes  y  discos  con  juegos  y  utilidades  por  sólo 
170.000.  Patricio  Puche  Juan,  c  Corredera,  7  -  19. 
30510  Yecla  (Murcia).  Tel.:  79  08  33.  (Ref. 
M-1001). 

•  Vendo  C-64  con  un  año  de  uso.  con  cintas,  con 
juegos  de  regalo.  25.000  ptas  -I-  gastos  de  envió. 
Daniel  Rodríguez,  c  Real,  21  -  5Q  A.  S  C  de  la 
Palma,  S  C  de  Tenerife.  Tel.:  41  13  82.  (Ref. 
M-1002). 

•  Compro  o  cambio  para  C-64  compilador  de  C. 
PETSPEED  y  cartucho  CP  M.  Antonio  de  Vera 
Simavilla.  Avda.  de  América,  6.  28028  Madrid. 
Tel.:  246  41  45.  (Ref.  M-1003). 

•  Vendo  interface  RS-232-C  y  HESMON-64,  pre¬ 
cio  a  convenir.  José  María.  Tel.:  302  26  52  de 
Madrid.  (Ref.  M-1004). 

•  Vendo  C-64  nuevo,  con  datacassette,  juegos  y 
revistas  por  40.000  pts.  Francesc  Paradell.  c  Fer¬ 
nando  Puig,  28  -  29.  08023  Barcelona.  Tel.:  212  14 
59.  (Ref.  M-1005). 

•  Compro  ejemplares  atrasados  de  Compute!  y 
Compute’s  Gazette!  a  1.000  pts.  cada  uno.  Fran¬ 
cisco  Martín  García.  Plaza  de  España  s/n.  21830 
Bonares  (Huelva).  Tel.:  36  63  1 1  de  1 2  a  1 5h.  (Ref. 
M-1006). 

•  Agradecería  información  sobre  Módems  y/o 
radiopaquetes  para  C-64,  tanto  Hardware  como 
Software,  tengo  unidad  de  disco.  J.M.  Rodrigo,  c 
Murillo,  5  -  49  D.  48901  Baracaldo.  Vizcaya.  (Ref. 
M-1007). 

•  Superbase  128.  Estoy  muy  interesado  en  contar 
con  usuarios  de  este  programa  para  intercambio  de 
aplicaciones,  trucos,  etc.  Miguel  A.  Martínez,  c 
Crta.  Madrid.  35  -  portal  2,  bajo  izq.  14610  Aleo- 
lea,  Córdoba.  (Ref.  M-1008). 


•  Vendo  C-64,  unidad  1541,  impresora  Riteman, 
cassette  y  programas  por  90.000  ptas.  Joan  Palo¬ 
mas  Mandolí.  Canigó  12,  Vic.  08500  Barcelona. 
Tel.:  886  30  45.  (Ref.  M-1009). 

•  Vendo  dos  cursos  de  programación  C-64,  y  todo 
sobre  el  nuevo  128.  Disco  Lencina  García-Barcia, 
c/  Dr.  Nieto,  44  -  99  C.  03013  Alicante.  Tel.:  520  26 
23.  (Ref.  M-1010). 

•  Urge  comprar  unidad  de  disco,  o  cambiar  un 
lote  de  programas  por  la  unidad,  impresora,  moni¬ 
tor  o  cualquier  otro  periférico.  Cambio  C-64  por 
C-128  pagando  la  diferencia.  Vendo  videopack  Phi¬ 
lips  G-7400  convertible  en  ordenador,  regalo  pro¬ 
gramas.  Francisco  Javier  Bernal  Malillos.  c  Eche- 
garav,  1.  Cantalejo,  Segovia.  Tel.:  52  04  04.  (Ref. 
M-1011). 

•  Vendo  Vic-20.  datacassette  y  joystick,  con 
manuales,  muy  nuevo  por  25.000  más  gastos  de 
envío.  José  M.a  Amat.  Tel.  965-37  46  34  de  Ali¬ 
cante.  (Ref.  M-1012). 

•  Vendo  C-64,  cassette,  joystick  y  cintas  por 
35.000  o  cambio  por  impresora  para  Amstrad  CPC 
6128.  Antoni  Soler  Martín.  Avda.  Doctor  Fleming, 
Edif.  Fluviá.  esc.  3a  -  6o  2a.  Viladecans.  08000  Bar¬ 
celona.  Tel.:  658  64  42.  (Ref.  M-1013). 

•  Vendo  C-64,  unidad  de  disco  1541,  datacassette, 
dos  joysticks  y  discos  y  cintas  con  juegos  y  utilida¬ 
des  por  70.000.  Luis  Jiménez  Gómez,  c  Benigno 
Soto,  12-7°  izq.  28002  Madrid.  Tel.:  416  44  28. 
(Ref.  M-1014). 

•  Compro  programa  “Almacén  V 1-03"  para  C-64. 
Milagros  Gongallo.  Tel.:  593  17  04  de  10  I9h, 
excepto  jueves.  (Ref.  M-íOtS). 

•  Vendo  Plotter  C.1TOH  CX-4800,  cuatro  colo¬ 
res,  y  cable  Centronics  para  conexión  directa  a  C- 
64  128.  Comprado  a  principios  del  86.  75.000  ptas. 
Ferrán  Delriu  Hust.  C  Santa  Clara.  8-10  -  2o  2a. 
08720  Villafranca  del  Penedes  (Barcelona).  Tel.: 
892  39  83.  (Ref.  M-1016). 

•  Vendo  dos  unidades  de  disco  8050  de  IM. 
70.000  las  dos  o  38.000  cada  una.  Regalo  progra¬ 
mas.  José  Lagunas.  Avda.  Cataluña,  34  -  Io  3. 
43002  Tarragona.  Tel.:  21  84  24  y  21  17  85.  (Ref. 
M-1017). 

•  Vendo  C-64  por  30.000.  unidad  de  discos  por 
40.000,  impresora  MPS-801  por  35.000  en  perfecto 
estado  todo  ello.  Mario  González  de  Ramón,  c 
Doctor  Cristóbal  Quevedo,  4.  25011  Las  Palmas. 
Tel.:  928-25  00  60  de  21  a  22  h.  (lunes  a  viernes). 
(Ref.  M-1018). 

•  Busco  instrucciones  del  Easv  Script  y  Magic 
Desk  I.  José  Antonio  Alonso,  e  Telleira,  42.  36210 
Vigo.  Tel.:  29  28  03.  (Ref.  M-1019). 

•  Vendo  Amstrad  6 1 28,  unidad  de  discos,  monitor 
color,  libros  y  programas  con  cinco  meses  de  garan¬ 
tía,  muy  poco  usado,  por  110.000  ptas.  También 
vendo  C-64,  cassette,  TV  blanco  y  negro  12”,  joys¬ 
tick,  programas  y  libros  por  50.000  ptas.  Josep  Pas¬ 
cual.  Avda.  Jacas,  22.  08810  Sant  Pere  de  Ribes. 
(Barcelona).  Tel.:  896  09  42.  (Ref.  M-1020). 

•  Vendo  C-64.  datacassette,  joystick,  libros  revis¬ 
tas  y  programas,  de  1  año,  sin  uso  prácticamente. 
Por  sólo  50.000-Francisco  José  Parra  Olmedo,  c 
Serrano,  8.  13700  Tomelloso  (Ciudad  Real).  Tel.: 
926-51  44  10  en  horas  de  comidas.  (Ref.  M-1021). 

•  Intercambio  programas  de  Astrología  para 
Commodore  AMIGA.  José  Muñoz  Reales,  c 
Martí  Codolar,  47.  (Drogería)  Hospitalet  del  LLo- 
bregat,  Barcelona.  (Ref.  M-1022) 

•  Vendo  C-64,  datacassette,  monitor  Dynadata, 
máquina  de  escribir  Brother  EP-20  con  interface 
para  conectar  al  ordenador  y  programas  por 
40.000.  Vendo  C-128  nuevo  por  40.000  y  unidad  de 
disco  por  30.000.  Miguel.  Tel.:  266  20  80  (Madrid) 
por  la  tarde.  (Ref.  M-1023). 

•  Vendo  Vic-20,  caja  con  expansor  de  cartuchos, 
ampliación  de  memoria,  superexpander,  ayuda  al 
programador,  monitor  código  máquina,  cartucho 
juego,  2  cintas  juegos,  cartucho  turbo,  curso  Basic 
con  4  cintas,  libro  de  programación,  “Acceso 
rápido  al  Vic-20  y  libros  de  juegos.  Precio  a  conve¬ 
nir.  Rafael.  Tel.:  91-759  37  10  de  14  a  17  h.  (Ref. 
M-1024). 

•  Vendo  Commodore  8032-SK,  impresora  8023P 
y  unidad  de  disco  8050.  Juan  Caralt.  c/  Eraso,  15. 


28080  Madrid.  Tel.:  246  58  82  en  horario  de  tienda. 

(Ref.  M-1025). 

•  Vendo  C-64,  revistas  y  juegos.  Salvador.  Tel.: 
93-353  86  25  de  10  a  12  h.  (Ref.  M-1026). 

•  Vendo  C- 1 28,  datacassette  (de  mayo  del  86),  dos 
joysticks,  ratón  y  software  gráfico,  cintas  con  pro¬ 
gramas,  revistas,  manuales,  etc.  por  65.000.  José 
Manuel  Tejero  Tabuenca.  c/  Cantabria,  47  -  13,  6a 
08020  Barcelona.  Tel.:  313  62  25  (tardes).  Sólo  en 
Barcelona.  (Ref.  M-1027). 

O  Vendo  Superexpander+3k  para  Vic-20  por 
4.000  ptas.  Juego  en  cartucho,  2.000;  juego  en  cinta, 

1 .000;  paddles,  2.500;  curso  Basic  con  cuatro  cintas, 
2.500;  joystick  750.  Sólo  Madrid.  Mario  Diez 
Gañán,  c/  Comandante  Zorita,  25  -  4o  C.  28020 
Madrid.  Tel.:  253  26  65.  (Ref.  M-1028). 

•  Vendo  libro  “Lenguaje  Máquina  para  C-64”  de 
Gustavo  Gil,  números  1 , 2  y  5.  De  la  “Enciclopedia 
de  Informática  Aplicada”,  números  I  y  2.  De  la 
“Enciclopedia  Basic”  encuadernados,  revistas  atra¬ 
sadas  “Tu  Micro”  e  “Input”,  Guía  del  Usuario  y 
alguna  que  otra  revista  suelta  por  5.000  o  cambiaría 
por  C-64  hecho  polvo.  (Ref.  M-1029). 

•  Carlos  Fuertes  Fuertes,  c /  Rosellón,  5o  -  2a. 
08029  Barcelona.  Tel.:  321  05  85.  También  urge 
conocer  coleccionista  o  similar  interesado  en 
radios  antiguas  (año  48).  (Ref.  M-1030). 

•  Cambio  compacto  Panasonic  (plato,  pletina  y 
sintetizador)  por  ordenador  Commodore  o  Ams¬ 
trad.  Luis  Miguel  Prego  Otero.  Ruado  Muelle,  17. 
Cambados  (Pontevedra).  Tel.:  986-54  20  14.  (Ref. 
M-1031). 

•  Vendo  impresora  MPS-801  con  cartuchos  de 
tinta,  papel  y  programas  en  cinta  o  disco.  Precio  a 
convenir.  Francisco  A.  Pradas.  Avda.  Diputación, 
4.  18100  A  milla  (Granada).  Tel.:  (958)  57  06  10,  de 
20  h.  en  adelante.  (Ref.  M-1032). 

•  Vendo  C-128.  unidad  de  disco  1570,  joystick,  2 
libros  de  Data  Becker,  juegos  varios  y  contabilidad 
por  120.000  ptas.  Luis.  Tel.:  (93)  751  64  27  de  9  a 
10.  (Ref.  M-1033). 

•  Vendo  C-128,  1570,  monitor  fósforo  verde, 
datacassette,  por  100.000  ptas.  Incluido  libros  revis¬ 
tas  y  programas.  Martín  Santiago  Vidal,  c/  Fela- 
nixt,  10.  08016  Barcelona.  Tel.:  (93)  350  68  80  los 
fines  de  semana.  (Ref.  M-1034). 

•  Vendo  C-64,  cassette,  juegos  y  revistas  por  sólo 
37.000  ptas.  negociables.  Miguel  Fernández  Mar¬ 
cos,  c/  Alcarria,  46.  Leganés  (Madrid).  Tel.:  688  1 2 
85  (Ref.  M-1035). 

•  Se  pasan  listados  de  programas  a  cintas  de  cas¬ 
sette.  Cualquier  modelo  Vic-20,  C-64  o  C-128. 
Individuales  o  en  conjunto.  Se  aconseja  mandar  los 
listados  fotocopiados.  Juan  C.  Gallego  Carbajo.  c/ 
Garnacho,  7  -  2Q  B.  S.M.  Valdeiglesias.  28680 
Madrid.  Tel.:  861  08  70.  (Ref.  M-1036). 

•  Desearía  contactar  por  carta  con  algún  “com- 
modoriano”  para  intercambiar  trucos,  novedades 
de  software  y  sobre  todo  las  soluciones  de  algunos 
programas  (en  el  caso  de  que  las  tenga).  Si  por 
defecto  el  lector/ a  reside  en  Valencia  capital  ó  pro¬ 
ximidades  intercambiaría  programas  personal¬ 
mente.  Responderé  a  todas  las  cartas.  Mi  dirección 
es:  c /  Maestro  Lope.  67  -  I  puerta.  Tel.:  363  81  10. 
Burjassot,  Valencia.  (Ref.  M-1037). 


TRABAJO 


•  Clases  particulares  de  Basic,  programador 
imparte  clases  de  Basic  por  las  tardes.  A  realizar  en 
mi  C-64  -F  unidad  de  disco  +  impresora  o  en  tu 
equipo.  Interesados  llamar  tardes  al  237  63  64,  pre¬ 
guntar  por  Paul.  Paul  Hernández  Kortis.  Plaza 
Gala  Placidia,  1-3  -  159.  08006  Barcelona. 

•  Se  pasan  listados  de  programas  a  cinta  de  casett 
cualquier  modelo  Vic-20,  C-64,  C-128.  Los  listados 
pueden  ser  individuales  o  en  conjunto.  Se  aconseja 
mandar  el  listado  fotocopiado.  Los  interesados  con¬ 
tactar  con  Juan  C.  Carbajo.  C/  Garnacho,  7-29  B. 
S.M.  Valdeiglesias.  Madrid. 


58/ Commodore  World 


•  Usuario  de  CBM-64,  interesado  en  las  comunica¬ 
ciones  desea  intercambiar  experiencias  con  otros 
usuarios.  Interesados  llamar  al  (977)  867K)  63  o 
escribir  a:  Juan  Macip.  Forn  de  la  Vila,  4.  43400 
Montblanc.  Tarragona.  (Ref.  C-125). 

•  Club  Usuario  Commodore-Tarragona,  Centro 
Homologado  por  la  Generalitat  de  Catalunya; 
nuestras  actividades  están  distribuidas  en  distintas 
secciones:  Biblioteca,  Programoteca,  Cursos,  Ase- 
soramiento,  etc...  Dos  años  al  servicio  de  nuestros 
socios.  Para  información:  Club  Usuaris  Commo- 
dore.  Apartado  Correos,  176,  o  también,  Fortuny, 
4  -  2^,  2a.  Tarragona.  Además  cursos  intensivos  de 
Basic.  ¡¡Infórmate!!.  (Ref.  C-126). 

•  Amigos  de  usuarios  de  ordenadores  Commo- 
dore:  queremos  crear  un  Club  para  todos  los  usua¬ 
rios  de  Commodore  en  Málaga  y  provincia,  para 
intercambiar  ideas,  programas,  trucos,  etc...  Con 
una  revista  propia  y  perspectiva  de  local  para 
reuniones  periódicas.  Llamar  o  escribir:  Miguel 
Díaz.  Puerto  Parejo,  21  -  29  H.  29013  Málaga.  (Ref. 
C-127). 

•  Desearía  contactar  con  usuarios  de  C-64,  para 
formar  Club  en  Badalona.  Se  pueden  compartir 
muchas  experiencias,  intercambio  de  Softwa¬ 
re. ..etc.  Contactar  con:  Tomás  Fernández  García. 
Avda.  Alfonso  X 1 1 1,  84,  Atico.  Badalona.  Barce¬ 
lona.  Tel.:  (93)  388  26  46.  (Ref.  C-128). 

•  Club  Intercommdore  para  todos  los  usuarios 
del  Commodore  64,  para  informaros,  escribir  a: 
Juán  Alarcón.  Algorta,  9  -  3°  D.  28019  Madrid. 
(Ref  C-129). 

•  ¡Atención!,  el  Club  L.B.I.  “La  Butxaca  Informá¬ 
tica”  se  ha  cambiado  de  local,  ahora  está  en: 
c /  Carcereny  i  Tristany,  7.  Sigue  abierto  a  vuestras 
cartas,  queremos  intercambiar  todo  tipo  de  expe¬ 
riencias,  programas,  información,  etc.  para  CBM 
64,  CBM  128,  CBM  16,  Amstrad,  Sharp,  Oric,  y 
para  el  legendario  Vic-20.  Ramón  Marimón.  Carce¬ 
reny  i  Tristany,  7.  St.  Feliú.  08980  Barcelona.  (Ref 
C-130). 

•  Unos  amigos  hemos  formado  un  club  para  el 
intercambio  de  software  del  C-64  y  C-128.  Pensa¬ 
mos  cambiar  tres  por  uno.  Sólo  para  usuarios  de 
Zaragoza.  Contactar  con:  David  Aso  Palacín. 
Residencial  Paraíso,  2  E-D,  49  C.  50008  Zaragoza. 
Teléf.:  21  95  64.  (David  Tardes)  ó  45  32  49.  (Eusebio 
Mañanas).  (Ref  C-131). 

•  Se  ha  formado  un  Club  de  Usuarios  del  Amiga  en 
Málaga,  para  la  gente  de  toda  España  e  incluso  del 
extranjero,  interesados  en  esta  genial  máquina, 
ponerse  en  contacto  con:  Víctor  Calvo  Medina. 
Club  de  Usuarios  del  Amiga.  C/  Beatas,  20  3Q  D 
29008  Málaga.  Teléf.:  (952)  21  44  09.  ( Ref  C-132). 

•  Club  Usuaris  Commodore-Tarragona,  centro 
homologado  por  la  Generalitat  de  Catalunya;  nues¬ 
tras  actividades  están  distribuidas  en  distintas  sec¬ 
ciones:  Biblioteca,  Programoteca,  Asesoramiento, 
etc.  Dos  años  al  servicio  de  nuestros  socios.  Para 
información:  Club  Usuaris  Commodore.  Apartado 
de  Correos  176,  Tarragona;  o  también,  Fortuny  4, 
29-2. a  Tarragona.  Además  cursos  de  Informática. 
(Ref  C-133). 

•  C.l.C.  (Club  Intercommodore),  pedir  informa¬ 
ción  a  C.l.C.  C /  Algorta,  9.  Buzón  9.  28019 
Madrid.  No  os  arrepentiréis.  (Ref  C-134). 

•  Hemos  formado  un  club  de  CBM  64  y  Spectrum 
48  K,  interesados  escribir  a  Marcelo  Gras.  Pe 
Coloma,  47-l.a-2.a.  08030  Barcelona  o  llamar  al 
teléfono  (93)  345  83  24  de  las  20,00  hasta  las  22,00. 
(Ref.  C-135). 

•  Se  ha  formado  el  Club  Commodore  Zamorano 

Casset  y  unidad  de  disco.  Interesados  escribir  a: 
Carlos  Salcedo  Serra.  C  Alto  de  San  Isidro  s/n. 
49002  Zamora.  O  bien  llamar  al  (988)  52  77  62. 
(Ref  C-136). 

•  C.l.C.  Club  Intercommodore  con  más  de  socios 
espera  que  tú  también  te  apuntes,  para  ser  más. 
Escribir  a  C.l.C.  calle  Algorta,  9  -  buzón  9.  28819 
Madrid.  (Ref  M-137). 

•  Club  Commodore  la  Palma.  Estamos  formando 
un  club  en  la  Palma  (Canarias)  para  usuarios  de 
Canarias  y  la  península.  Escribir  a:  Daniel  Rodrí¬ 
guez  Fuentes,  c/  Real,  21  -  5Q,  portal  A.  S/C  de  la 
Palma,  S/C  de  Tenerife.  (Ref  M-138). 


1  DESEAN  CONTACTAR  CON  OTROS 
AMIGOS  COMMODORIANOS 


•  Pablo  Diego  Gayte.  Sabino  Arana,  15-19.  48013 
Bilbao. 

•  Juan  Lorenzo  Moya  Naleno.  C/  Jacinto  Bena- 
vente,  52.  Tel.:  (926)  36  01  03.  Infantes  (Ciudad 
Real).  Poseo  cassette. 

•  Donald  Timson  Herranz.  c/  Virtudes,  6  -  7Q  izq. 
Tel.:  447  67  03.  Madrid  28010.  Poseo  cassette. 


•  Francisco  M.  Rosado.  C  Fuente  Nueva.  8.  Tel.: 
(927)  24  50  22.  10003  Cáceres.  Poseo  cassette. 

•  David  Noviembre  Naranio.  C  Santiago.  44. 
Tel.:  (955)  42  72  84.  2174  Hinojos  (Huelva).  Poseo 
cassette  C2N  mod  1530.  Mandar  lista  de  programas. 

•  Fernando  Pérez  Heredia.  C  Santoña,  47  -  2Q. 
28026  Madrid.  Poseo  cassette  y  unidad  de  disco. 

•  Miguel  Ropero  Molinero.  C  P"  San  Isidro,  8. 
Tel.:  (926)  51  01  00.  13700  Tomelloso  (Ciudad 
Real).  Poseo  cassette. 

•  Agustín  García  Cerdan.  C/  Nueva,  14  -  2Q.  Tel.: 
(976)  63  01  98.  50700  Zaragoza.  Poseo  cassette  y 
unidad  de  disco. 

•  Pablo  Argaluza  Leira.  C/  Villamonte,  A  -  10,  39 
drcha.  Algorta  (Vizcaya).  Poseo  cassette,  juegos,  y 
utilidades  preferentemente. 
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•  José  Manuel  Paricio  Sánchez.  C/  Hermanos 
Gambra,  8-2Q  deha.  50010  Zaragoza.  Teléfono:  (976) 
31  78  23.  Poseo  cassette  y  unidad  de  disco. 

•  Juan  Lupión  López.  C/  Casarabonela,  21-5e  B. 
Tel.:  33  58  71.  29006  Málaga.  Poseo  cassette. 

•  José  García  R.  C/  Aceiterías,  12.  Teléfono:  (987) 
41  80  19.  Ponferrada  24400  León.  Poseo  cassette. 

•  Fernando  Alonso.  C/  Pío  XII,  5.  Teléfono:  (941) 
23  61  39.  Logroño.  26003  La  Rioja.  Poseo  cassette. 

•  Mario  García  Anibarro.  C/  Burgos,  8-I9C.  Tel.: 
(91)  613  28  07.  Móstoles.  28931  Madrid.  Poseo 
cassette. 

•  Pedro  V.  Sánchez  de  la  Cruz.  C/  Pedro  Ma 
Plano  46.  Tel.:  (924)  313  878.  06800  Mérida  (Bada¬ 
joz).  Poseo  cassette. 


•  “Tengo  un  C-64,  desearía  contactar  con  simila¬ 
res  para  cambio  de  juegos.  LLamar  a  partir  de  las 
20’30  noches.  Tel.:  664  04  56.  Barcelona” 

•  Santiago  Avellaneda  Orts.  C/  Miguel  Hernán¬ 
dez,  4  E.  Apartado  84  (Cullera)  Valencia. 

•  Rafael  Jesús  Barrios  Rodríguez.  C/  Mota  del 
Cuervo,  2  -  4,  3.  28043  Madrid.  Poseo  disco  y 
cinta. 

•  Carlos  Salcedo  Serra.  C/  Alto  de  San  Isidro 
s/n.  49002  Zamora.  Tel.:  (988)  52  77  64.  Poseo  un 
cassette  y  unidad  de  disco. 

•  José  Manuel  Pérez  Fdez.  C/  Cazadores  de 
Tarifa,  2  -  29  B.  Tel.:  (956)  78  10  12.  11360  San 
Roque  (Cádiz).  Poseo  cassette. 

•  Jorge  Peña.  C /  Avda.  Paralelo,  1 14  -  5Q,  2Q 
deha.  Tel.:  329  32  81.  08015.  Barcelona.  Poseo 
cassette. 

•  Francisco  García  López.  C/  Plaza  de  las  Escue¬ 
las,  10.  04740  Almeria.  Poseo  cassette.  Preferente¬ 
mente  los  programas  en  turbo. 

•  Pedro  Moreno  Espigares.  C/  María,  66. 
Malaga.  Poseo  unidad  de  disco. 

•  David  Noviembre.  C,  Santiago,  44.  Tel.:  42  72 
84.  21740  Hinojos  (Huelva).  Poseo  cassette  C2N 
mod.  1530.  Mandar  lista  de  programas. 

•  Ricardo  Cervera  Saiz.  C/  Pg  Verdun,  33.  Tel.: 
353  8181.  08031  Barcelona.  Poseo  cassette  y  uni¬ 
dad  de  disco. 

•  Oscar  García  Madrid.  C/  Custodio  Pugas,  Bl.  9 
3Q  izq.  Tel.:  (952)  54  02  57.  Torre  del  Mar  (Málaga). 
Poseo  cassette. 

•  Miguel  Angel  Escalante  Tuque.  C  Reyes  Cató¬ 
licos,  18.  Tel.:  (955)  42  71  99.  21740  Hinojos 
(Huelva).  Poseo  unidad  de  disco  1541. 

•  Antonio  Molina  García.  C/  BQ  Constitución 
blq.  12  -  29  C.  Melilla.  Poseo  unidad  de  disco. 

•  Francisco  y  Juan  José.  Apdo.  C.  35063.  Barce¬ 
lona.  Poseo  cassette  y  unidad  de  disco. 

•  Casiano  López  Coreóles.  C/  Baraundillo,  I. 
30001  Murcia.  Poseo  cassette. 

•  Miguel  A.  Escalante  Luque.  C/  Reyes  Católi¬ 
cos,  18.  Tel.:  (955)  42  71  99.  21740  Hinojos 
(Huelva).  Poseo  cassette  C2N  y  unidad  de  disco 
1541-1571.  Mandar  lista  de  programas. 

•  Mario  García  Anibarro.  C/  Burgos,  8  -  1Q  C. 
Tel.:  613  28  07.  28931  Mostoles  (Madrid).  Poseo 
cassette. 

•  Andrés  Amores  Martínez.  C/  Longares,  1.  Tel.: 
213  60  95.  28022  Madrid.  Poseo  cassette. 

•  Sebastián  Gil  Villanueva.  C/  Maldonado,  28. 
Tel.:  62  00  74  (veci.).  11350  Los  Barrios  (Cádiz). 
Poseo  cassette,  1.200  programas. 

•  Isidoro  Aguilera  Gasque.  C/  Plz.  Constitución, 
7  -  59,  19.  Tel.:  20  86  18.  12005  Castellón.  Pos.eo 
cassette  y  unidad  de  disco. 
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•  Manuel  Pérez  Heredia.  C /  Santoña,  47  -  29. 
28026  Madrid.  Poseo  cassette  y  unidad  de  disco. 

•  José  Cesar  Martínez.  C/  Marqués  de  Guadalca- 
zar,  16  -  19,  69.  14006  Córdoba.  Poseo  unidad  de 
disco. 

•  Santiago  Meroño  León.  C¡  Los  Fontes  s/n. 

Tel.:  57  75  64.  Torre  Pacheco  (Murcia).  Poseo 

cassette. 

•  María  Jesús  Demirecki.  C/  Encomienda  de 
Palacios,  228.  Tel.:  772  01  85.  28030  Madrid.  Poseo 
cassette  y  unidad  de  disco. 

•  Luis  Mata  Rivas.  C/  Avda.  de  Africa,  12.  Tel.: 
(956)  51  53  59.  Ceuta.  Poseo  cassette  y  unidad  de 
disco. 

•  Mario  García  Anibarro.  C/  Burgos,  8  -  |9  C 
Tel.:  613  28  07.  28931  Mostoles  (Madrid).  Poseo 
cassette. 

•  Deseo  contactar  con  otros  amigos  commodo- 
rianos.  Ismael  Rodríguez  de  Robles  y  Prieto.  C/ 
Moreira  Casal,  1  -  5o  E  izqdo.  Tel.:  50  46  37.  36600 
Villafranca  de  Arosa  ( Pontevedra).  Poseo  cassette  y 
unidad  de  disco. 

•  Deseo  contactar  con  otros  amigos  commodo- 
rianos.  Jesús  Fernández  García.  C/  Vega  de 
Arriba,  3  -  59  B.  Tel.:  (985)  46  28  19.  33600  Mieres 
(Asturias).  Poseo  cassette. 


/  AMIGA  _ / 

•  Carlos  Alvaréz  Chicano.  C  Moncayo  Villa 
Irene,  I.  Tel.:  29  24  60.  Miraflores  de  El  Palo 
(Málaga). 

•  Deseo  contactar  con  otros  amigos  commodo- 
rianos.  Diego  Lencina  García-Barcia.  C/  Doctor 
Nieto,  44  -  99  C.  Tel.:  (96)  520  26  23.  03013 
Alicante. 

•  Jorge  José  Isear.  C  Rodríguez  San  Pedro,  10. 
Tel.:  446  77  07.  28015  Madrid.  Poseo  unidad  de 
disco. 

•  Francisco  José  Loperena.  C  Daoiz,  2.  Tel.: 
(956)  51  57  19.  11701  Ceuta.  Poseo  Impresora 
Epson  y  unidad  de  disco  EXT.3.5. 

•  David  Boix  Matamala.  C/  Avda.  Morera,  32-36 
A,  29.  Tel.:  395  42  03.  08915  Badalona  (Barcelona). 
Poseo  unidad  de  disco. 

•  Manuel  Cotarelo  Suárez.  Cj  Alberto  Aguilera, 
66  -  49  izq.  Tel.:  244  30  53.  28015  Madrid.  Poseo 
unidad  de  disco  3’5. 

•  Pedro  Sosa  Sosa.  C  Ramón  Freixas,  59  -  A,  49 
3a.  Tel.:  (93)  890  14  70.  08720  Villfranca  Padés 
(Barcelona).  Poseo-unidad  de  disco  3’5. 


Deseo  contactar  con  otros  amigos  Commodorianos 


Nombre  . 


Dirección. 


Telf. : .  Ciudad:. 


C.P .  Provincia. 


Modelo  de  ordenador. 


Tengo  Cassette 


Unidad  de  Disco. 


Commodore  World  /59 


Distribuidor :  Hispasoft ,  S.A. 
c /  Coso,  87  -  6Q  A 
50001  Zaragoza 
Tel:  (976)  39  99  61 
Precios:  DIJO  (1.700  pías.) 

VARIO  (2.900  pías.) 

ROM-DISK  (10.900  pías.) 

ROM-DISK  GOLIA  TH  (16.900  ptas .) 
EXPANSOR  CARTUCHOS  (10.900  ptas.) 


Antes  de  comentar  lo  que  son  las 
tarjetas  EPROMS  y  las  tarjetas 
ROM-DISK  vamos  a  explicar 
brevemente  lo  que  es  una 
EPROM,  pues  muchos  de  nues¬ 
tros  lectores  no  sabrán  de  qué  se  trata  ni  para 
qué  sirve. 

Una  EPROM  es  un  tipo  de  integrado  de 
memoria  que  se  encuentra  entre  las  memo¬ 
rias  RAM  y  ROM.  Pueden  grabarse  y 
borrarse,  y  su  contenido  perdura  una  vez 
apagado  el  ordenador.  Se  utilizan  para  los 
cartuchos  de  juegos,  aplicaciones,  para 
almacenar  los  sistemas  operativos  de  orde¬ 
nador  (Basic,  Kernal...)  y  muchas  cosas  más. 
Para  programarlas  hay  que  utilizar  un  pro¬ 
gramador  de  EPROMS  (ver  la  reseña  del 
GOLIATH,  en  esta  misma  sección)  y  para 
borrarlas  un  borrador  de  EPROMS,  cuyo 
único  inconveniente  esv  ser  casi  tan  caro  como 
el  programador.  Al  conectar  un  cartucho  (o 
lo  que  es  lo  mismo,  una  EPROM)  en  el  port 
de  expansión  lo  que  el  ordenador  hace  es  leer 
los  datos  que  contiene  en  vez  de  leer  la 
memoria  RAM  con  que  arranca  normal¬ 
mente.  Al  ser  este  acceso  de  tipo  electrónico, 
el  tiempo  de  lectura  es  casi  nulo,  como 
habréis  comprobado  todos  los  que  tengáis 
algún  cartucho  de  juegos.  Las  EPROMS 
pueden  tener  muchos  tamaños,  desde  las  más 
pequeñas,  que  almacenan  1K  hasta  las  de 
64K  o  más. 

No  se  puede  conectar  directamente  una 
EPROM  al  port  de  expansión:  hace  falta  una 
placa  y  algún  que  otro  componente  electró¬ 
nico.  Esto  se  lo  pueden  fabricar  los  usuarios 
hábiles  en  electrónica,  pero  también  se  ven¬ 
den  hechas.  La  tarjeta  DUO  (foto  1)  permite 
conectar  hasta  dos  EPROMS  a  la  vez,  que  se 
pueden  seleccionar  independientemente  me¬ 
diante  unos  interruptores.  La  capacidad  total 
es  de  16K  como  máximo  (dos  de  8K). 

La  tarjeta  VARIO  permite  conectar  tam¬ 
bién  dos  EPROMS,  de  hasta  16K  (modelo 
27128)  y  seleccionar  su  colocación  en  la 
memoria  por  medio  de  8  microswitches. 
Permite  trabajar  como  la  tarjeta  DUO  y  tiene 
un  botón  de  conexión  desconexión.  Tanto  la 
tarjeta  DUO  como  la  VARIO  tienen  botón 
de  RESET  incorporado. 

Una  tarjeta  ROM-DISK  es,  básicamente, 
una  tarjeta  que  contiene  varias  EPROMS. 
De  los  dos  modelos  que  comercializa  Hispa¬ 
soft,  el  ROM-DISK  tiene  una  capacidad  de 
256K,  y  el  ROM-DISK  GOLIATH  1M,  es 
decir,  I.024K.  Naturalmente,  no  pueden  utili¬ 
zarse  estos  1 .024K  a  la  vez,  pues  el  C-64  es  un 
ordenador  de  64K.  Un  ejemplo  lo  aclarará 
mejor:  en  la  tarjeta  ROM  DISK  de  256K 
podrías  tener  a  la  vez  el  cartucho  de  juegos 


1.  La  tarjeta  BSU  KERNAL 
(izquierda)  permite  trabajar 
con  un  KERNAL 
modificado.  VARIOyDUO 
se  utilizan  para  la 
fabricación  de  cartuchos 
propios. 

2.  A  la  izquierda,  el  ROM- 
DISK  GOLIA  TH,  de  ÍM  de 
capacidad;  y  a  la  derecha,  el 
ROM-DISK  de  256K. 
Permiten  conectar  16  u  8 
EPROMS  respectivamente. 

3.  El  expansor  permite  la 
conexión  de  cinco  cartuchos 
simultáneamente. 


TOOTH  INVADERS.  el  cartucho  MUSIC 
COMPOSER,  una  copia  de  EASY  SCRIPT 
en  cartucho,  el  cartucho  de  la  hoja  electró¬ 
nica  CALC  RESULT,  tus  utilitarios  favori¬ 
tos  grabados  en  otra  EPROM,  el  S1MONS’ 
BASIC...  y  aún  te  sobraría  sitio.  Natural¬ 
mente,  no  puedes  conectar  los  cartuchos  tal 
cual,  tienes  que  hacer  una  copia  de  su  conte¬ 
nido  en  una  EPROM,  que  puede  ser  desde 
una  2764  (8K)  hasta  una  27512  (64K).  El 
acceso  a  estos  programas  es  casi  instantáneo, 
de  hecho  puedes  “cargar”  64K  en  menos  de  I 
segundo. 

Al  arrancar  la  tarjeta  ROM-DISK  aparece 
un  menú  en  pantalla  que  pregunta  cuál  de  los 
zócalos  vas  a  utilizar.  Estos  es  así  porque 
sólo  puedes  utilizar  uno  (una  EPROM)  cada 
vez.  Acto  seguido  te  preguntará  el  tipo  de 
EPROM  que  hay  en  ese  zócalo.  Con  sólo 
pulsar  una  tecla  la  tarjeta  se  configura  de  la 
misma  manera  que  si  tuvieras  esa  sola 
EPROM  conectada  (como  si  en  realidad 
fuera  un  cartucho).  Por  este  sistema  puedes 
acceder  instantáneamente  a  cualquiera  de  los 
programas  que  tengas  en  el  ROM-DISK. 

Estos  programas  pueden  autoarrancarse 
desde  código  máquina,  pues  después  de  la 
selección  la  tarjeta  hace  un  RESET  y  sale  al 
Basic.  Esto  te  permite  tener  EPROMS  pro¬ 
gramadas  por  ti,  con  tus  utilitarios  favoritos, 
en  cualquier  sitio  de  la  memoria  del  C-64.  Un 
buen  ejemplo  sería  tener  un  ensamblador  en 
una  EPROM,  arrancar  la  tarjeta  y  salir  al 
Basic.  Con  hacer  después  un  SYS,  el  ensam¬ 
blador  se  inicializará  y  estaría  listo  para 
funcionar. 


Las  diferencias  entre  las  tarjetas  ROM- 
DISK  y  ROM-DISK  GOLIATH  (foto  2)  no 
son  muchas,  aparte  del  tamaño  externo  y  la 
capacidad.  La  ROM-DISK  incorpora  un  sis¬ 
tema  de  LEDs  para  identificar  la  EPROM 
que  se  está  utilizando  y  la  ROM-DISK 
GOLIATH  tiene  un  slot  de  expansión  en  el 
que  se  puede  conectar  un  cartucho  normal. 
Ambas  tienen  un  botón  de  reset  y  un  inte¬ 
rruptor  para  la  conexión/desconexión.  Dado 
su  tamaño,  se  suministran  con  unas  pequeñas 
“patas”,  para  evitar  que  por  su  peso  se  dañe 
el  port  de  expansión.  Los  manuales  son  sen¬ 
cillos  pero  completos,  y  contienen  explica¬ 
ciones  paso  a  paso  y  ejemplos  para  la  crea¬ 
ción  de  cartuchos  por  parte  del  usuario. 
Están  traducidos  al  castellano,  al  igual  que 
los  menús  de  arranque  de  las  tarjetas. 

El  expansor  de  cartuchos  (foto  3)  es  algo 
muy  conocido,  y  permite  conectar  a  la  vez 
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cinco  cartuchos  de  cualquier  tipo  (siempre 
que  sean  compatibles)  y  seleccionar  los  que 
se  quiere  utilizar  mediante  interruptores. 

Una  última  tarjeta  muy  curiosa  es  la  tar¬ 
jeta  BSU  KERNAL.  Esta  tarjeta  se  conecta 
en  el  zócalo  interno  del  C-64  en  el  que  va 
alojado  el  sistema  operativo  KERNAL. 
Permite  conectar  otro  zócalo,  de  modo  que 
mediante  un  simple  interruptor,  que  puede 
colocarse  en  la  carcasa,  puede  seleccionarse 


la  ROM  KERNAL  original  o  nuestra  versión 
“particular”  del  KERNAL.  Esto  puede  ser 
muy  interesante  por  ejemplo  para  tener  un 
Kernal  que  utilice  turbo  para  la  unidad  de 
discos  (StarDos,  etc.)  y  no  tener  que  estar 
poniéndolo  y  quitándolo  cada  vez  que  se 
quiere  utilizar;  o  también  para  utilizar  ver¬ 
siones  modificadas  del  KERNAL,  como  la 
que  permite  que  la  salida  por  impresora  se 
dirija  a  una  impresora  Centronics,  para  no 


tener  que  cargar  el  interface  Centronics  cada 
vez  que  se  vaya  a  utilizar. 

Todas  estas  tarjetas  son  muy  interesantes, 
y  no  son  caras  (excepto  el  expansor  de  cartu¬ 
chos),  teniendo  en  cuenta  su  utilidad.  Seguro 
que  serán  bien  acogidas  por  los  programa¬ 
dores-usuarios  que  no  quieran  perder  tiempo 
cargando  utilidades  y/o  aplicaciones,  o  para 
los  que  quieran  crearse  sus  propios  cartu¬ 
chos.  ■ 


PROGRAMADOR 


Distribuidor:  Hispasoft ,  S.A. 
c/  Coso ,  87  -6°  A 
50001  Zaragoza 
Tel.:  (976)  39  99  61 
Precio:  15.900  pías. 


Más  potente  y  versátil  de  lo 
que  su  propio  nombre  indi¬ 
ca,  el  programador  de 
EPROM’s  GOLIATH  es 
muy  sencillo  de  manejo. 

Todo  se  controla  por  completos  menús  de 
acceso  a  las  diferentes  opciones.  Todo  en  cas¬ 
tellano  y  con  sobrada  información  para  el 
usuario. 

¿Para  qué  sirve  un  programador  de 
EPROM’s?  Es  muy  simple  y  complejo  a  la 
vez.  Cuando  se  desea  acceder  con  la  máxima 
velocidad  y  seguridad  a  un  programa,  lo 
mejor  es  utilizar  un  cartucho  que  contenga 
ese  programa.  Por  supuesto  que  un  cartucho 
es  complicado  de  fabricar,  pero  grabar  la 
EPROM  no  es  tan  difícil.  Además,  HISPA- 
SOFT  ha  pensado  en  todo  y  en  todos.  Para 
los  que  no  tengáis  conocimientos  o  posibili¬ 
dades  de  preparar  el  cartucho  (soporte  para 
vuestros  programas  grabados  en  EPROM), 
esta  empresa  comercializa  una  tarjetas  de 
varios  tipos  y  capacidades  (ver  comentario 
en  esta  misma  sección  de  reseñas).  Esas  tarje¬ 
tas  de  expansión  te  servirán  como  medio 
ideal  para  trabajar  e  incluso  experimentar 
con  tus  programas  grabados  en  EPROM’s. 

Pasando  un  poco  más  en  profundidad  a 
las  posibilidades  de  este  programador,  hay 
que  destacar  la  amplia  gama  de  tipos  de 
EPROM’s  que  puede  leer  y  grabar.  Desde 
una  2716  (2K  de  memoria)  hasta  las  más 
gordas,  27512  (64K  de  memoria).  Y  de  diver¬ 
sos  tipos  de  tensión  de  grabación:  sin  tipo 
definido,  tipo  A,  o  tipo  D  (21  voltios). 

Para  cargar  en  memoria  una  EPROM 
27512  entera,  hace  falta  un  ordenador  con 
capacidad  superior  a  los  64K,  pero  GO- 
LIATH  permite  leer  este  tipo  de  EPROM  en 
dos  veces  y  grabarlas  de  igual  manera.  Ade¬ 
más,  si  se  desea  tener  más  de  un  programa 
grabado  en  el  mismo  circuito  integrado  (la 
misma  EPROM),  este  maravilloso  progra¬ 
mador  te  permite  realizar  tu  propio  menú 
para  elegir  programa. 

Cuando  se  habla  de  programas  grabados 
en  EPROM,  se  debe  tener  en  cuenta  que  se 
hace  referencia  al  código  máquina.  Los  pro¬ 
gramas  BASIC  no  pueden  grabarse  y  auto 
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ejecutarse  como  el  código  máquina  (supo¬ 
nemos  que  ya  lo  sabíais).  Sin  embargo,  pue¬ 
den  almacenarse  programas  en  Basic  como 
datos,  para  luego  trasladarlos  a  la  zona 
RAM  destinada  a  estos  programas  y  ejecu¬ 
tarlos  desde  c.m. 

El  acceso  al  menú  principal  se  hace  des¬ 
pués  de  cargar  el  programa  desde  el  disco. 
También  existe  la  opción  de  tener  el  pro¬ 
grama  grabado  en  una  EPROM.  Desde  este 
menú  se  puede  acceder  a  las  opciones  de  gra¬ 
bación,  lectura,  comprobación  (para  saber  si 
la  EPROM  está  limpia  o  no),  etc...  También 
da  paso  este  menú  a  la  elección  del  tipo  de 
EPROM  que  se  va  a  utilizar.  Esto  último  es 
importantísimo  a  la  hora  de  trabajar  con 
estos  circuitos  integrados. 

Para  poder  comprobar,  preparar  o  alterar 
el  contenido  de  un  programa  en  un  EPROM 
hace  falta  un  monitor  o  editor.  GOLIATH 
posee  un  completísimo  editor  que  muestra  y 
permite  cambiar  el  contenido  de  los  pro¬ 
gramas  leídos  desde  una  EPROM.  Así 
es  posible  preparar  programas  propios,  me¬ 
nús,  etc... 

El  aspecto  exterior  del  grabador  es  muy 
agradable.  Poco  voluminoso  pero  muy  fun¬ 


cional  y  efectivo.  Además,  tiene  en  su  parte 
posterior  la  conexión  de  la  placa  tipo  “port 
del  usuario”.  Esto  permite  conectar  una 
impresora,  modem,  etc.  al  ordenador,  como 
si  no  estuviese  el  grabador  ocupando  la 
salida. 

En  conjunto,  es  una  herramienta  muy  efi¬ 
caz  y  sencilla  de  manejar.  Su  precio  es  lo  de 
menos,ya  que  lo  merece.  Personalmente  lo  he 
probado  unas  cuantas  veces  y  es  muy  bueno. 
Es  un  complemento  ideal  para  el  ordenador 
y  para  quienes  desean  aventurarse  en  sus 
propios  proyectos  y  ampliaciones.  ■ 


NUEVA  UNIDAD  DE  DISCOS  PARA 
LOS  ORDENADORES  COMMODORE 


Ordenador:  Cualquier  Commodore  que 

trabaje  con  la  1541 

Distribuidor:  Hispasoft ,  S.A . 

c/  Coso ,  87  -6o  A 

50001  Zaragoza 

Tel:  (976)  39  99  61 

Precio:  39.000  ptas. 


Desde  hace  unas  semanas  His¬ 
pasoft  comercializa  la  unidad 
de  discos  ARGOS,  un  perifé¬ 
rico  atractivo  por  su  precio  y 
prestaciones.  La  unidad  de 
disco  es  un  periférico  imprescindible  para 
alguien  que  quiera  utilizar  el  ordenador  para 
fines  serios.  No  sólo  aumenta  la  velocidad  de 
lectura/grabación,  sino  que  permite  ganar  en 


sencillez  de  manejos,  ordenación  (sabes  lo  que 
tienes  en  cada  disco)  y  espacio.  La  unidad  de 
discos  Commodore  1541  (el  modelo  más  ex¬ 
tendido  actualmente)  es  sin  duda  la  más-lenta- 
del-mundo,  pero  actualmente  existen  mil  y 
un  métodos  para  acelerarla,  desde  los  pro¬ 
gramas  por  software  (Hypraload,  +  Rapid 
publicado  en  Commodore  World  ,  Vor- 
pal),  los  cartuchos  (Fast  Load  de  Epyx,  Final 
Cartridge,  Quick  Disk-F)  o  los  “engrendros 
mecánicos”  (StarDos,  Dolphin  Dos)  que  cam¬ 
bian  la  ROM  de  la  unidad  y  del  ordenador. 

La  unidad  de  discos  Argos  ofrece  una 
compatibilidad  tal  que  todos  estos  progra¬ 
mas  y  cartuchos  funcionan  sin  problemas.  Lo 
hemos  comprobado  con  copiadores  rápidos, 
turbos,  cartuchos  y  no  hemos  tenido  el  más 
mínimo  fallo.  Esto  suple  en  parte  la  falta  de 
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velocidad.  Los  tiempos  de  acceso  son  exac¬ 
tamente  los  mismos,  salvo  para  el  formateo, 
que  se  realiza  considerablemente  más  depri¬ 
sa.  Los  comandos  para  manejarla  son  exac¬ 
tamente  los  mismos,  por  lo  que  funciona 
tanto  con  programas  propios  como  comer¬ 
ciales. 

En  su  aspecto  exterior.  Argos  es  más 
pequeña  que  su  compañera  1541,  entre  otras 
cosas  porque  lleva  el  transformador  fuera  de 
la  carcasa.  Internamente  es  más  compacta  y 
está  mejor  acabada  que  la  1541.  Es  pues  una 
unidad  a  tener  en  cuenta  a  la  hora  de  la  com¬ 
pra  sobre  todo  por  el  precio. 

Como  hemos  podido  comprobar,  el  tama¬ 
ño  de  la  nueva  unidad  ARGOS  es  un  punto  a 


tener  en  cuenta.  Da  un  respiro  a  nuestras 
“demasiado  abarrotadas”  mesas  de  trabajo 
informático.  Se  puede  colocar  en  posición 
horizontal  o  vertical,  aunque  la  unidad  está 
preparada  para  ser  colocada  en  la  primera 
forma. 

En  cualquier  caso,  gracias  al  tamaño,  se 
pueden  colocar  varias  de  estas  unidades  en 
un  reducido  espacio,  en  cualquier  rincón  de 
la  mesa. 

En  el  próximo  número  de  nuestra  revista 
revisaremos  más  a  fondo  las  posibilidades  y 
características  de  esta  unidad.  También  rese¬ 
ñaremos  sus  especiales  prestaciones  al  traba¬ 
jar  con  la  implantación  del  acelerador  de 
disco 


MICRORYTHM 


Ordenador:  C-64 
Distribuidor:  DRO  SOFT 
c/  Fundadores ,  3 
28028  Madrid 
Tel  :  (91)  225  25  00 
Precio:  699  pías. 


Dentro  de  la  serie  “silver”  de 
Firebird  nos  hemos  encontrado 
este  curioso  programa.  Es  un 
sintetizador  de  batería,  que 
permite  la  composición  de 
melodías  o  ritmos,  en  base  a  unos  instrumen¬ 
tos  predefinidos.  No  es  nada  nuevo,  pues  en 
el  mercado  hay  unos  cuantos  programas  de 
este  tipo:  Drum  Action,  Rock’n’Roll  o  el  in¬ 
creíble  DigiDrum,  que  con  cartucho  incluido 
ofrece  salida  a  cascos  o  amplificador  de 
sonidos  digitalizados. 

Microrythm  utiliza  el  chip  de  sonido  SID 
del  C-64  para  reproducir  los  sonidos  de  una 
batería.  Pueden  oírse  el  bombo,  los  tambores 
y  los  platillos,  en  varias  formas  distintas,  e 
incluso  tiene  otros  “instrumentos”  menos 
corrientes  como  un  cencerro,  una  pandereta 
o  el  ruido  de  palmas.  Todos  ellos  son  muy 
reales,  porque  la  capacidad  de  síntesis  del  C- 
64  es  increíble. 

Existen  tres  modos  de  funcionamiento:  el 
“tiempo-real”,  en  el  que  se  utiliza  el  teclado 
como  una  batería,  y  que  sirve  para  hacer 
pruebas,  el  modo  compás  y  modo  composi¬ 


ción.  En  el  modo  compás  (se  pueden  pro¬ 
gramar  99  distintos)  se  pueden  editar  hasta 
16  sonidos  cada  vez,  utilizando  los  instru¬ 
mentos  que  antes  hemos  mencionado.  Des¬ 
pués  se  unirán  los  compases  en  el  modo 
composición  para  formar  la  “canción”  final. 
En  este  modo  pueden  variarse  algunos  valo¬ 
res  sobre  los  instrumentos,  como  el  tono  o  el 
eco.  También  puede  seleccionarse  un  ritmo 
para  cada  compás. 

Al  entrar  en  el  modo  composición  basta 
con  indicar  por  orden  el  número  de  compases 
a  tocar  para  que  formen  la  “canción”.  La 
longitud  de  una  composición  es  práctica¬ 
mente  ilimitada,  dado  que  hay  poca  memo¬ 
ria:  esto  permite  crear  composiciones  enor¬ 
mes.  Existen  facilidades  para  moverse  por 
cada  compás  de  la  composición,  borrar, 
insertar  o  copiar.  En  total  hay  4  canciones, 
independientes  entre  sí.  Nada  más  arrancar 
el  programa  hay  40  compases  preprograma¬ 
dos  y  tres  canciones  de  demostración,  algo 
más  que  suficiente  para  aprender  a  mane¬ 
jarlo.  Las  canciones  y  los  compases  se  pue¬ 
den  grabar  y  leer  de  cinta,  por  supuesto. 

Como  en  casi  todos  los  programas  de  este 
tipo,  se  echa  de  menos  una  opción  que  per¬ 
mita  utilizar  lo  que  hemos  compuesto  en 
nuestros  propios  programas.  Las  instruccio¬ 
nes  están  en  castellano  y  son  muy  sencillas, 
porque  el  programa  no  necesita  nada  más.  Es 


divertido,  aunque  tampoco  es  nada  del  otro 
mundo,  y  por  su  precio  puede  venir  muy  bien 
para  iniciarse  en  este  tipo  de  programas 
musicales. 


DEPARTAMENTO  DE  SUSCRIPCIONES 

Para  que  vuestros  contactos  con  nosotros  sean  más  rápidos  y  seguros, 
indicad  el  departamento  al  que  va  dirigida  vuestra  carta. 

Todos  los  pedidos  de  números  atrasados,  renovación  de  suscripciones, 
problemas  del  correo  con  vuestra  suscripción,  etc.,  dirigidlos  a: 

DEPARTAMENTO  DE  SUSCRIPCIONES  (COMMODORE  WORLD) 

C/  Rafael  Calvo,  18  -  42  B 
28010  MADRID 

Nuestro  servicio  será  mejor  con  vuestra  colaboración.  GRACIAS. 
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■  ^°n  tU  VOt°  Puec*es  ayudarnos  a  encontrarlos.  Revisa  tu  pro 

*  gramoteca  y  selecciona  los  dos  juegos  que  más  te  gusten  dentro 
de  las  categorías  que  vienen  a  continuación.  Vale  cualquier  juego 
tanto  los  más  antiguos  como  los  más  modernos. 

1.  Simuladores  de  Vuelo:  Cualquier  tipo  de  simulador  de  vuelo,  tanto 
“serio”  como  de  acción.  Ejemplos:  Flight  Simulator  II,  Solo  Flight, 
Super  Huey,  etc. 

2.  Deportes:  Simulaciones  de  deportes  reales  o  imaginarios:  Summer 
Games,  One-on-one  o  Ballblazer,  por  ejemplo. 

3.  Lucha:  Todos  los  juegos  de  Karate  y  similares:  The  Way  of  the 

exploding  Fist,  Frank  Bruno’s  Boxing,  Knight  Games. 

4.  Arcade  o  mata-marcianos:  Aunque  no  hay  que  matar 
marcianos,  aquí  entran  todos  los  juegos  de  disparar¬ 
ía  o-evitar-a-todo-lo-que-se-mueva:  Uridium,  Comman-  I 

do  o  Batalyx,  por  ejemplo. 

5.  Plataformas:  Juegos  de  coger  cosas,  abrir  puer- 
í  f  tas,  saltar,  subir  y  bajar  escaleras  a  través  de  muchas 

jr  pantallas.  Misión  Imposible,  Monty  on  the  Run 

I  ,  .■  f  4  Cauldron  son  de  este  tipo. 

/  6.  Carreras:  De  coches,  bicicletas,  motos,  todo  vale 

BPfc  M  Por  ejemplo  Pitstop,  Supercycle,  Tour  de  France. 

¡r  JgÉfeC-'  ¿  7.  Aventuras:  Juegos  de  texto  y  gráficos,  conversacionales 

E ^  The  Hobbit,  Borrowed  Time,  Labyrinth. 

F  s  8.  Estrategia  y  acción:  Medio  aventuras  medio  acción  o 

estrategia,  también  entran  algunos  simuladores.  Buenos  ejem 
píos  son  Elite,  Silent  Service,  Hacker. 

9.  Mejor  juego  de  todos  los  tiempos  (sólo  uno):  Sin  comenta¬ 
rios.  Aquí  no  hay  categorías.  Vale  repetir  los  de  las  otras 
secciones. 

Es  cierto  que  hay  algunos  juegos  que  no  sabe  uno  en  qué  categoría  enmar¬ 
carlos.  Hazlo  en  la  que  mejor  te  parezca,  según  tu  propia  opinión. 


LOS  MEJORES  JUEGOS 


Nombre . 

Dirección 

Ciudad 

Modelo  de  Ordenador 


Al)Kl 


¡8 


1.  Simulador  de  vuelo 

2.  Deportes  . 

3.  Lucha . . 

4.  Arcade 

5.  Plataformas 

6.  Carreras  . 

7.  Aventuras 


Los  resultados  del 


sorteo  y  las  votaciones 
serán  publicados  en  el 


numero  de  junio. 


No  es  obligatorio  relle¬ 
nar  todas  las  secciones. 


Escribe  a  máquina  o 
con  letra  muy  clara  en 
mayúsculas. 


8.  Estrategia/ Acción  . 

9.  Mejor  juego  de  todos  los  tiempos: 


PAiAiiion  news 


DáZá  mon 


REPRESENTACION  EN 
datamon,  s  a  ESPAÑA  DE: 


íotsiimi: 


PRO  VENZA,  385-387  TELEX  97791 

TEL.  (93)  207  24  99  *  08025  BARCELONA 


A  Vd.  que  ya  nos  conoce  por  las  impresoras 

ffisnw 


y  confía  en  nosotros  por  la  calidad,  servicio  y  garantía 


Gama  F+/C+  Gama  RIO  Gama  R15 

le  ofrecemos  ahora  también  los  ordenadores  personales  compatibles-asequibles 


PECHA 


— — 3010  ^  ~  Stand  217 


720  IKLawaíe*'  — 
Turbo 

1 1 1 1 1 1 1 1 1 1  i  I 

los  más  avanzados 


«ce hw**. 


os  tecnológicamente  y  con  la  mejor  relación  precio-prestaciones 


Gama  8088  (4,77  Mhz) 


Gama  Turbo  (4,77  y  8  Mhz) 


\  \ 


Gama  AT  Turbo  (8  y  10  Mhz) 


De  venta  en  los  mejores  establecimientos  especializados 


